• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /macosx-10.10/emacs-93/emacs/lisp/

Lines Matching +defs:new +defs:state

39 ;; to add new commands.  One bug though: keys with meta-prefix cannot
173 (defvar isearch-push-state-function nil
174 "Function to save a function restoring the mode-specific isearch state
487 (defvar isearch-new-forward nil)
695 (isearch-push-state)
756 (isearch-lazy-highlight-new-loop))
856 (defsubst isearch-string-state (frame)
859 (defsubst isearch-message-state (frame)
862 (defsubst isearch-point-state (frame)
865 (defsubst isearch-success-state (frame)
868 (defsubst isearch-forward-state (frame)
871 (defsubst isearch-other-end-state (frame)
874 (defsubst isearch-word-state (frame)
877 (defsubst isearch-error-state (frame)
880 (defsubst isearch-wrapped-state (frame)
883 (defsubst isearch-barrier-state (frame)
886 (defsubst isearch-case-fold-search-state (frame)
889 (defsubst isearch-pop-fun-state (frame)
890 "Return the function restoring the mode-specific isearch state in FRAME."
893 (defun isearch-top-state ()
895 (setq isearch-string (isearch-string-state cmd)
896 isearch-message (isearch-message-state cmd)
897 isearch-success (isearch-success-state cmd)
898 isearch-forward (isearch-forward-state cmd)
899 isearch-other-end (isearch-other-end-state cmd)
900 isearch-word (isearch-word-state cmd)
901 isearch-error (isearch-error-state cmd)
902 isearch-wrapped (isearch-wrapped-state cmd)
903 isearch-barrier (isearch-barrier-state cmd)
904 isearch-case-fold-search (isearch-case-fold-search-state cmd))
905 (if (functionp (isearch-pop-fun-state cmd))
906 (funcall (isearch-pop-fun-state cmd) cmd))
907 (goto-char (isearch-point-state cmd))))
909 (defun isearch-pop-state ()
911 (isearch-top-state))
913 (defun isearch-push-state ()
920 (if isearch-push-state-function
921 (funcall isearch-push-state-function)))
968 (isearch-new-string isearch-string)
969 (isearch-new-message isearch-message)
970 (isearch-new-forward isearch-forward)
971 (isearch-new-word isearch-word)
1030 isearch-new-word t)
1034 (setq isearch-new-string
1041 isearch-new-message
1043 isearch-new-string "")))
1051 ;; Copy new local values to isearch globals
1052 (setq isearch-string isearch-new-string
1053 isearch-message isearch-new-message
1054 isearch-forward isearch-new-forward
1055 isearch-word isearch-new-word))
1072 ;; Push the state as of before this C-s.
1073 (isearch-push-state)
1098 (setq isearch-new-forward t)
1103 (setq isearch-new-forward nil)
1109 (if (functionp (isearch-pop-fun-state (car (last isearch-cmds))))
1110 (funcall (isearch-pop-fun-state (car (last isearch-cmds)))
1133 (isearch-pop-state))
1182 (isearch-push-state)
1257 (isearch-pop-state))
1406 (isearch-push-state)
1441 (not (isearch-error-state (cadr isearch-cmds)))
1456 (or (isearch-error-state frame)
1457 (let* ((string (isearch-string-state frame))
1465 (isearch-string-state (car previous)))
1475 (isearch-other-end-state (car previous)))
1508 ;; tamper with isearch's state, or move point. It is unacceptable for the
1855 (isearch-push-state))
2080 (and (isearch-success-state (car isearch-cmds))
2082 (if (functionp (isearch-pop-fun-state (car isearch-cmds)))
2083 (funcall (isearch-pop-fun-state (car isearch-cmds)) (car isearch-cmds)))
2084 (goto-char (isearch-point-state (car isearch-cmds)))))
2356 (defun isearch-lazy-highlight-new-loop (&optional beg end)
2357 "Cleanup any previous `lazy-highlight' loop and begin a new one.