Lines Matching +defs:isearch +defs:mode +defs:end +defs:hook
38 (defvar viper-mode-string)
42 (defvar iso-accents-mode)
43 (defvar quail-mode)
50 (defvar undo-end-posn)
68 ;; end pacifier
168 (defun viper-after-change-sentinel (beg end len)
169 (run-hook-with-args 'viper-after-change-functions beg end len))
172 (defun viper-before-change-sentinel (beg end)
173 (run-hook-with-args 'viper-before-change-functions beg end))
180 (viper-restore-cursor-color 'after-insert-mode)))
197 (let ((has-saved-cursor-color-in-insert-mode
198 (stringp (viper-get-saved-cursor-color-in-insert-mode))))
199 (or has-saved-cursor-color-in-insert-mode
202 (viper-save-cursor-color 'before-insert-mode))
203 ;; set insert mode cursor color
206 (let ((has-saved-cursor-color-in-emacs-mode
207 (stringp (viper-get-saved-cursor-color-in-emacs-mode))))
208 (or has-saved-cursor-color-in-emacs-mode
211 (viper-save-cursor-color 'before-emacs-mode))
212 ;; set emacs mode cursor color
236 (viper-restore-cursor-color 'after-insert-mode))
245 ;; in another frame, the pre-command hook won't change cursor color to
250 (<= (point) (viper-replace-end)))
252 (viper-restore-cursor-color 'after-replace-mode)
259 (viper-restore-cursor-color 'after-replace-mode)))
268 ;; Don't delete more than to the end of repl overlay
270 (viper-replace-end) viper-last-posn-in-replace-region)
272 ;; So, this limits deletion to the end of line
273 (viper-chars-in-region (point) (viper-line-pos 'end))
280 ;; in another frame, the pre-command hook won't change cursor color to
287 ;; cursor color or, if they terminate replace mode, the color will be changed
290 (viper-restore-cursor-color 'after-replace-mode))
294 (let ((replace-boundary (viper-replace-end)))
300 ;; terminate replace mode if reached replace limit
301 (if (= viper-last-posn-in-replace-region (viper-replace-end))
312 ;; terminate replace mode if changed Viper states.
316 ;; changing mode
322 ;; desirable that viper-pre-command-sentinel is the last hook and
323 ;; viper-post-command-sentinel is the first hook.
328 (make-local-hook 'viper-after-change-functions)
329 (make-local-hook 'viper-before-change-functions)
330 (make-local-hook 'viper-post-command-hooks)
331 (make-local-hook 'viper-pre-command-hooks))
335 (remove-hook 'post-command-hook 'viper-post-command-sentinel)
336 (add-hook 'post-command-hook 'viper-post-command-sentinel)
337 (remove-hook 'pre-command-hook 'viper-pre-command-sentinel)
338 (add-hook 'pre-command-hook 'viper-pre-command-sentinel t)
339 ;; These hooks will be added back if switching to insert/replace mode
340 (remove-hook 'viper-post-command-hooks
342 (remove-hook 'viper-pre-command-hooks
349 ;; This is a normal hook that is executed in insert/replace
385 (add-hook 'viper-post-command-hooks
387 (add-hook 'viper-pre-command-hooks
391 ;; Nothing needs to be done to switch to emacs mode! Just set some
395 ;; always turn off iso-accents-mode in vi-state, or else we won't be able to
397 (cond ((eq new-state 'vi-state) (viper-set-iso-accents-mode nil));accents off
398 (viper-automatic-iso-accents (viper-set-iso-accents-mode t));accents on
399 (t (viper-set-iso-accents-mode nil)))
400 ;; Always turn off quail mode in vi state
408 (viper-normalize-minor-mode-map-alist)
410 (viper-set-mode-vars-for new-state)
411 (viper-refresh-mode-line)
429 (setq viper-insert-diehard-minor-mode
445 ) ; end insert/replace case
447 (setq viper-vi-diehard-minor-mode (not viper-want-emacs-keys-in-vi))
456 ;; Normalizes minor-mode-map-alist by putting Viper keymaps first.
459 (defun viper-normalize-minor-mode-map-alist ()
462 (cons 'viper-vi-intercept-minor-mode viper-vi-intercept-map)
463 (cons 'viper-insert-intercept-minor-mode viper-insert-intercept-map)
464 (cons 'viper-emacs-intercept-minor-mode viper-emacs-intercept-map)
467 (list (cons 'viper-vi-minibuffer-minor-mode viper-minibuffer-map)
468 (cons 'viper-vi-local-user-minor-mode viper-vi-local-user-map)
469 (cons 'viper-vi-kbd-minor-mode viper-vi-kbd-map)
470 (cons 'viper-vi-global-user-minor-mode viper-vi-global-user-map)
471 (cons 'viper-vi-state-modifier-minor-mode
473 (cdr (assoc major-mode viper-vi-state-modifier-alist)))
474 (cdr (assoc major-mode viper-vi-state-modifier-alist))
476 (cons 'viper-vi-diehard-minor-mode viper-vi-diehard-map)
477 (cons 'viper-vi-basic-minor-mode viper-vi-basic-map)
478 (cons 'viper-replace-minor-mode viper-replace-map)
479 ;; viper-insert-minibuffer-minor-mode must come after
480 ;; viper-replace-minor-mode
481 (cons 'viper-insert-minibuffer-minor-mode
483 (cons 'viper-insert-local-user-minor-mode
485 (cons 'viper-insert-kbd-minor-mode viper-insert-kbd-map)
486 (cons 'viper-insert-global-user-minor-mode
488 (cons 'viper-insert-state-modifier-minor-mode
490 (cdr (assoc major-mode
492 (cdr (assoc major-mode
495 (cons 'viper-insert-diehard-minor-mode viper-insert-diehard-map)
496 (cons 'viper-insert-basic-minor-mode viper-insert-basic-map)
497 (cons 'viper-emacs-local-user-minor-mode
499 (cons 'viper-emacs-kbd-minor-mode viper-emacs-kbd-map)
500 (cons 'viper-emacs-global-user-minor-mode
502 (cons 'viper-emacs-state-modifier-minor-mode
505 (assoc major-mode viper-emacs-state-modifier-alist)))
507 (assoc major-mode viper-emacs-state-modifier-alist))
516 ;; with viper-vi/insert-state-modifier-minor-mode can be different.
517 ;; ***This is needed only in case emulation-mode-map-alists is not defined.
518 ;; In emacs with emulation-mode-map-alists, nothing needs to be done
520 (and (fboundp 'add-to-ordered-list) (boundp 'emulation-mode-map-alists))
521 (set (make-local-variable 'minor-mode-map-alist)
524 minor-mode-map-alist)))
530 ;; Viper mode-changing commands and utilities
532 ;; Modifies mode-line-buffer-identification.
533 (defun viper-refresh-mode-line ()
534 (set (make-local-variable 'viper-mode-string)
540 ;; Sets Viper mode string in global-mode-string
541 (force-mode-line-update))
549 (defun viper-set-mode-vars-for (state)
550 "Sets Viper minor mode variables to put Viper's state STATE in effect."
553 (setq viper-vi-minibuffer-minor-mode nil
554 viper-insert-minibuffer-minor-mode nil
555 viper-vi-intercept-minor-mode nil
556 viper-insert-intercept-minor-mode nil
558 viper-vi-local-user-minor-mode nil
559 viper-vi-kbd-minor-mode nil
560 viper-vi-global-user-minor-mode nil
561 viper-vi-state-modifier-minor-mode nil
562 viper-vi-diehard-minor-mode nil
563 viper-vi-basic-minor-mode nil
565 viper-replace-minor-mode nil
567 viper-insert-local-user-minor-mode nil
568 viper-insert-kbd-minor-mode nil
569 viper-insert-global-user-minor-mode nil
570 viper-insert-state-modifier-minor-mode nil
571 viper-insert-diehard-minor-mode nil
572 viper-insert-basic-minor-mode nil
573 viper-emacs-intercept-minor-mode t
574 viper-emacs-local-user-minor-mode t
575 viper-emacs-kbd-minor-mode (not (viper-is-in-minibuffer))
576 viper-emacs-global-user-minor-mode t
577 viper-emacs-state-modifier-minor-mode t
583 viper-vi-intercept-minor-mode t
584 viper-vi-minibuffer-minor-mode (viper-is-in-minibuffer)
585 viper-vi-local-user-minor-mode t
586 viper-vi-kbd-minor-mode (not (viper-is-in-minibuffer))
587 viper-vi-global-user-minor-mode t
588 viper-vi-state-modifier-minor-mode t
591 viper-vi-diehard-minor-mode (not
594 viper-vi-basic-minor-mode t
595 viper-emacs-intercept-minor-mode nil
596 viper-emacs-local-user-minor-mode nil
597 viper-emacs-kbd-minor-mode nil
598 viper-emacs-global-user-minor-mode nil
599 viper-emacs-state-modifier-minor-mode nil
605 viper-insert-intercept-minor-mode t
606 viper-replace-minor-mode (eq state 'replace-state)
607 viper-insert-minibuffer-minor-mode (viper-is-in-minibuffer)
608 viper-insert-local-user-minor-mode t
609 viper-insert-kbd-minor-mode (not (viper-is-in-minibuffer))
610 viper-insert-global-user-minor-mode t
611 viper-insert-state-modifier-minor-mode t
614 viper-insert-diehard-minor-mode (not
618 viper-insert-basic-minor-mode t
619 viper-emacs-intercept-minor-mode nil
620 viper-emacs-local-user-minor-mode nil
621 viper-emacs-kbd-minor-mode nil
622 viper-emacs-global-user-minor-mode nil
623 viper-emacs-state-modifier-minor-mode nil
644 (viper-mode)
645 (if overwrite-mode (overwrite-mode -1))
649 (if abbrev-mode (expand-abbrev))
663 (viper-restore-cursor-color 'after-emacs-mode)
664 (viper-restore-cursor-color 'after-insert-mode))
670 (run-hooks 'viper-vi-state-hook)
683 (let ((has-saved-cursor-color-in-insert-mode
684 (stringp (viper-get-saved-cursor-color-in-insert-mode))))
685 (or has-saved-cursor-color-in-insert-mode
687 (viper-save-cursor-color 'before-insert-mode))
692 (run-hooks 'viper-insert-state-hook)
699 (run-hooks 'viper-insert-state-hook)
703 viper-replace-minor-mode nil))
707 ;; Change to replace state. When the end of replacement region is reached,
711 ;; Run insert-state-hook
713 (run-hooks 'viper-insert-state-hook 'viper-replace-state-hook)
719 ;; 'R' is implemented using Emacs's overwrite-mode
720 (viper-start-R-mode))
732 (let ((has-saved-cursor-color-in-emacs-mode
733 (stringp (viper-get-saved-cursor-color-in-emacs-mode))))
734 (or has-saved-cursor-color-in-emacs-mode
736 (viper-save-cursor-color 'before-emacs-mode))
743 (run-hooks 'viper-emacs-state-hook)
747 ;; escape to emacs mode termporarily
757 ;; escape to Vi mode termporarily
767 ;; Escape to STATE mode for one Emacs command.
771 ;; this temporarily turns off Viper's minor mode keymaps
772 (viper-set-mode-vars-for state)
773 (viper-normalize-minor-mode-map-alist)
778 (let (viper-vi-kbd-minor-mode
779 viper-insert-kbd-minor-mode
780 viper-emacs-kbd-minor-mode)
793 ;; escaped to command, Viper's mode vars will remain those of
796 (viper-set-mode-vars-for viper-current-state)
820 (viper-set-mode-vars-for viper-current-state))
826 ;; Also takes care of the iso-accents mode
828 (viper-set-mode-vars-for 'emacs-state)
829 (viper-normalize-minor-mode-map-alist)
833 (viper-set-iso-accents-mode t))
835 (let (viper-vi-kbd-minor-mode
836 viper-insert-kbd-minor-mode
837 viper-emacs-kbd-minor-mode
888 ((and (boundp 'iso-accents-mode) iso-accents-mode)
921 (viper-set-iso-accents-mode nil)
922 (viper-set-mode-vars-for viper-current-state)
930 (viper-set-mode-vars-for 'vi-state)
933 (let (viper-vi-kbd-minor-mode) ; execute without kbd macros
941 (viper-set-mode-vars-for viper-current-state)))
942 (viper-set-mode-vars-for viper-current-state)
950 (viper-set-mode-vars-for 'emacs-state)
955 (viper-set-mode-vars-for viper-current-state)))
956 (viper-set-mode-vars-for viper-current-state)
959 ;; This executes the last kbd event in emacs mode. Is used when we want to
960 ;; interpret certain keys directly in emacs (as, for example, in comint mode).
968 ;; arrange to reorganize minor-mode-map-alist so that things will work right.
969 (defun viper-harness-minor-mode (load-file)
970 "Familiarize Viper with a minor mode defined in LOAD_FILE.
975 (viper-harness-minor-mode load-file)
977 LOAD-FILE is a name of the file where the specific minor mode is defined.
982 (eval-after-load load-file '(viper-normalize-minor-mode-map-alist))
984 ;; Change the default for minor-mode-map-alist each time a harnessed minor
985 ;; mode adds its own keymap to the a-list.
987 (and (fboundp 'add-to-ordered-list) (boundp 'emulation-mode-map-alists))
989 load-file '(setq-default minor-mode-map-alist minor-mode-map-alist)))
997 Other ESC sequences are emulated via the current Emacs's major mode
1053 (let (minor-mode-map-alist emulation-mode-map-alists)
1103 ) ; end progn
1118 ;; interpret these keys in Emacs mode, so ESC won't be interpreted as a Vi key.
1144 ;; prefix argument for Vi mode
1146 ;; In Vi mode, prefix argument is a dotted pair (NUM . COM) where NUM
1235 cmd-to-exec-at-end)
1274 ;; we prepare the command that will be executed at the end.
1281 ;; we execute it at the very end
1288 (setq cmd-to-exec-at-end
1306 ;; If we change ?C to ?c here, then cc will enter replacement mode
1308 ;; than normal. We decided to not use replacement mode here and
1309 ;; follow Vi, since replacement mode on n full lines can be achieved
1323 (if cmd-to-exec-at-end
1330 (funcall cmd-to-exec-at-end cmd-info)
1379 (defsubst viper-append-to-register (reg start end)
1382 (buffer-substring start end))))
1385 (defun viper-save-last-insertion (beg end)
1387 (setq viper-last-insertion (buffer-substring beg end))
1389 ;; beg or end marker are somehow screwed up
1391 (setq viper-last-insertion (buffer-substring beg end))
1634 ;; call viper-change to invoke the replace mode on the region.
1759 ;; hook used inside undo
1763 (defun viper-undo-sentinel (beg end length)
1764 (run-hook-with-args 'viper-undo-functions beg end length))
1766 (add-hook 'after-change-functions 'viper-undo-sentinel)
1769 (defun viper-after-change-undo-hook (beg end len)
1772 undo-end-posn (or end beg))
1774 ;; the buffer in response to 'undo'; so remove this hook to avoid
1776 (remove-hook 'viper-undo-functions 'viper-after-change-undo-hook 'local)
1785 undo-beg-posn undo-end-posn)
1787 ;; the viper-after-change-undo-hook removes itself after the 1st invocation
1788 (add-hook 'viper-undo-functions 'viper-after-change-undo-hook nil 'local)
1793 ;; undo-end-posn (or undo-end-posn (point)))
1795 ;; undo-end-posn (or undo-end-posn undo-beg-posn))
1797 (if (and undo-beg-posn undo-end-posn)
1806 (goto-char undo-end-posn)
1975 (end-of-line)
1976 ;; make sure all lines end with newline, unless in the minibuffer or
2000 (defun viper-enlarge-region (beg end)
2001 (or beg (setq beg end)) ; if beg is nil, set to end
2002 (or end (setq end beg)) ; if end is nil, set to beg
2004 (if (< beg end)
2005 (progn (goto-char beg) (set-mark end))
2006 (goto-char end)
2012 (if (> beg end) (exchange-point-and-mark)))
2024 (cond ((string-match "tex.*-mode" (symbol-name major-mode)) "%%")
2025 ((string-match "java.*-mode" (symbol-name major-mode)) "//")
2026 ((string-match "perl.*-mode" (symbol-name major-mode)) "#")
2027 ((string-match "lisp.*-mode" (symbol-name major-mode)) ";;")
2028 ((memq major-mode '(c-mode cc-mode c++-mode)) "//")
2029 ((memq major-mode '(sh-mode shell-mode)) "#")
2046 (defun viper-same-line (beg end)
2050 (if (and beg end (> beg end))
2052 beg end
2053 end temp))
2054 (if (and beg end)
2055 (cond ((or (> beg (point-max)) (> end (point-max))) ; out of range
2060 (if (= (viper-line-pos 'start) end)
2062 (<= (+ incr (count-lines beg end)) 1))))
2067 (defun viper-end-with-a-newline-p (string)
2085 (add-hook 'minibuffer-setup-hook 'viper-minibuffer-setup-sentinel)
2086 (add-hook 'post-command-hook 'viper-minibuffer-post-command-hook))
2090 (let ((hook (if viper-vi-style-in-minibuffer
2103 (funcall hook)
2106 ;; Thie is a temp hook that uses free variables init-message and initial.
2110 (defun viper-minibuffer-standard-hook ()
2119 (if (fboundp 'minibuffer-prompt-end)
2120 (delete-region (minibuffer-prompt-end) (point-max))
2125 (if (fboundp 'minibuffer-prompt-end)
2126 (minibuffer-prompt-end)
2129 (defun viper-minibuffer-post-command-hook()
2136 ;; Run viper-minibuffer-exit-hook before exiting.
2142 (run-hooks 'viper-minibuffer-exit-hook)
2169 ;; Used as a minibuffer exit hook in read-file-name
2209 "Delete junk at the end of the first line of the minibuffer input.
2210 Remove this function from `viper-minibuffer-exit-hook', if this causes
2215 (end-of-line)
2233 (let ((minibuffer-setup-hook
2234 ;; stolen from add-hook
2236 (if (boundp 'minibuffer-setup-hook)
2237 minibuffer-setup-hook
2240 'viper-minibuffer-standard-hook
2257 (setq minibuffer-setup-hook nil
2287 ;; Called when state changes from Insert Vi command mode.
2327 "Append at end of line."
2334 (end-of-line)
2363 (end-of-line)
2367 (end-of-line)
2436 (add-hook
2437 'viper-after-change-functions 'viper-replace-mode-spy-after t 'local)
2438 (add-hook
2439 'viper-before-change-functions 'viper-replace-mode-spy-before t 'local)
2441 (add-hook 'after-change-functions 'viper-after-change-sentinel t)
2442 (add-hook 'before-change-functions 'viper-before-change-sentinel t)
2445 (add-hook
2448 (add-hook
2451 (remove-hook
2453 (if overwrite-mode (overwrite-mode -1))
2457 (defun viper-replace-mode-spy-before (beg end)
2458 (setq viper-replace-region-chars-deleted (viper-chars-in-region beg end))
2466 (defun viper-replace-mode-spy-after (beg end length)
2476 (let* ((real-end (min end (viper-replace-end)))
2477 (column-shift (- (save-excursion (goto-char real-end)
2491 (max (viper-chars-in-region beg real-end)
2512 (max (if (> end (viper-replace-end)) (viper-replace-end) end)
2520 ;; Delete stuff between viper-last-posn-in-replace-region and the end of
2522 ;; the overlay and current point is before the end of the overlay.
2523 ;; Don't delete anything if current point is past the end of the overlay.
2525 (remove-hook
2526 'viper-after-change-functions 'viper-replace-mode-spy-after 'local)
2527 (remove-hook
2528 'viper-before-change-functions 'viper-replace-mode-spy-before 'local)
2529 (remove-hook
2531 (remove-hook
2533 (viper-restore-cursor-color 'after-replace-mode)
2539 (viper-replace-end))
2540 (< (point) (viper-replace-end)))
2542 viper-last-posn-in-replace-region (viper-replace-end))))
2546 ;; replace mode ended => nullify viper-last-posn-in-replace-region
2549 (viper-refresh-mode-line)
2560 (defun viper-finish-R-mode ()
2561 (remove-hook
2563 (remove-hook
2567 (defun viper-start-R-mode ()
2569 (overwrite-mode 1)
2570 (add-hook
2572 (add-hook
2575 (remove-hook
2585 (if overwrite-mode ; if in replace mode invoked via 'R'
2586 (viper-finish-R-mode)
2606 ;; text-property maps, we could do away with viper-replace-minor-mode and
2610 (> (point) (viper-replace-end)))
2611 (let (viper-replace-minor-mode com)
2620 (if (viper-same-line (point) (viper-replace-end))
2623 (delete-region (point) (viper-line-pos 'end))
2625 (end-of-line)
2634 ;; Similar to Emacs's own overwrite-mode.
2636 "Begin overwrite mode."
2650 (viper-set-replace-overlay (point) (viper-line-pos 'end))
2741 On reaching end of line, stop and signal error."
2778 ;; Like forward-char, but doesn't move at end of buffer.
2935 ;; this is a bit different from Vi, but Vi's end of word
2937 (defun viper-end-of-word-kernel ()
2938 (if (viper-end-of-word-p) (forward-char))
2946 (defun viper-end-of-word-p ()
2957 (defun viper-end-of-word (arg &optional careful)
2958 "Move point to end of current word."
2964 (viper-loop val (viper-end-of-word-kernel))
2968 (viper-execute-com 'viper-end-of-word val com)))))
2970 (defun viper-end-of-Word (arg)
2971 "Forward to end of word delimited by white character."
2978 (viper-end-of-word-kernel)
2984 (viper-execute-com 'viper-end-of-Word val com)))))
3063 "Go to end of line."
3069 (end-of-line val)
3088 (viper-line-pos 'start) (viper-line-pos 'end)))
3096 (end-of-line)
3134 (end-of-line)
3173 "Change to end of line."
3192 "Go to ARG's line. Without ARG go to end of buffer."
3223 point region-beg region-end)
3231 (end-of-line))
3232 (setq region-end (point)))
3233 (setq region-end (point))
3239 (< (- region-end region-beg)
3244 (< (- region-end region-beg)
3250 (if (> arg 0) "end" "beginning")
3253 (narrow-to-region region-beg region-end)
3534 (let (beg-lim end-lim)
3541 (end-of-line)
3542 (setq end-lim (point)))
3543 (cond ((re-search-forward "[][(){}]" end-lim t)
3635 ;; should be mode-specific
3645 (defun viper-heading-end (arg)
3650 (re-search-forward viper-heading-end nil t val)
3652 (if com (viper-execute-com 'viper-heading-end nil com))))
3659 (end-of-line)
3784 (defun viper-set-searchstyle-toggling-macros (unset &optional major-mode)
3789 If MAJOR-MODE is set, set the macros only in that major mode."
3792 (if (and major-mode (symbolp major-mode))
3793 (setq scope major-mode)
3842 If the optional prefix argument is non-nil and specifies a valid major mode,
3843 this sets the macros only in the macros in that major mode. Otherwise,
3844 the macros are set in the current major mode.
3854 (or arg-majormode major-mode))
3859 (or arg-majormode major-mode))
4045 ;; This is a Viper wraper for isearch-forward.
4046 (defun viper-isearch-forward (arg)
4051 (viper-exec-form-in-emacs (list 'isearch-forward arg)))
4053 ;; This is a Viper wraper for isearch-backward."
4054 (defun viper-isearch-backward (arg)
4059 (viper-exec-form-in-emacs (list 'isearch-backward arg)))
4136 (if (viper-end-with-a-newline-p text)
4138 (end-of-line)
4186 (if (viper-end-with-a-newline-p text) (beginning-of-line))
4212 (defun viper-copy-region-as-kill (beg end)
4214 (copy-region-as-kill beg end)
4222 end-del-pos)
4226 (> val (viper-chars-in-region (point) (viper-line-pos 'end))))
4227 (setq val (viper-chars-in-region (point) (viper-line-pos 'end))))
4232 (setq end-del-pos (point)))
4237 (downcase viper-use-register) (point) end-del-pos))
4240 viper-use-register (point) end-del-pos nil))
4253 end-del-pos)
4262 (setq end-del-pos (point)))
4267 (downcase viper-use-register) end-del-pos (point)))
4270 viper-use-register end-del-pos (point) nil))
4279 "Delete 1 char backwards while in insert mode."
4288 "Delete one character in replace mode.
4324 (end-of-line)
4341 (defun viper-change (beg end)
4343 (if (markerp end) (setq end (marker-position end)))
4345 (or beg (setq beg end))
4350 (copy-to-register viper-use-register beg end nil)
4352 (viper-set-replace-overlay beg end)
4360 (viper-replace-end)))
4367 (viper-replace-end)))
4370 (goto-char (viper-replace-end))
4378 viper-replace-region-end-delimiter)
4388 (viper-replace-end))
4398 (defun viper-change-subr (beg end)
4400 (or beg (setq beg end))
4403 (copy-to-register viper-use-register beg end nil)
4405 (kill-region beg end)
4431 the query replace mode will toggle between string replace
4445 (message "Query replace mode changed to %s"
4478 (defun viper-mark-end-of-buffer ()
4479 "Mark end of buffer."
4484 (message "Mark set at the end of buffer"))
4493 ((viper= char ?>) (viper-mark-end-of-buffer))
4636 (= (point) (match-end 0))))
4672 (if (and viper-electric-mode
4673 (not (memq major-mode '(fundamental-mode
4674 text-mode
4675 paragraph-indent-text-mode))))
4676 (indent-according-to-mode)
4684 (if abbrev-mode (expand-abbrev))
4727 (viper-heading-end arg))
4751 (end-of-line)
4826 viper-electric-mode nil
4834 viper-electric-mode t
4874 viper-electric-mode
4875 (viper-standard-value 'viper-electric-mode)
4881 (viper-set-mode-vars-for viper-current-state)
4923 viper-electric-mode, viper-want-ctl-h-help, viper-want-emacs-keys-in-vi,
4929 ) ; end while
5000 ;; If mode info is needed, add variable to `let' and then set it below,
5019 (setq varlist (list 'viper-vi-minibuffer-minor-mode
5020 'viper-insert-minibuffer-minor-mode
5021 'viper-vi-intercept-minor-mode
5022 'viper-vi-local-user-minor-mode
5023 'viper-vi-kbd-minor-mode
5024 'viper-vi-global-user-minor-mode
5025 'viper-vi-state-modifier-minor-mode
5026 'viper-vi-diehard-minor-mode
5027 'viper-vi-basic-minor-mode
5028 'viper-replace-minor-mode
5029 'viper-insert-intercept-minor-mode
5030 'viper-insert-local-user-minor-mode
5031 'viper-insert-kbd-minor-mode
5032 'viper-insert-global-user-minor-mode
5033 'viper-insert-state-modifier-minor-mode
5034 'viper-insert-diehard-minor-mode
5035 'viper-insert-basic-minor-mode
5036 'viper-emacs-intercept-minor-mode
5037 'viper-emacs-local-user-minor-mode
5038 'viper-emacs-kbd-minor-mode
5039 'viper-emacs-global-user-minor-mode
5040 'viper-emacs-state-modifier-minor-mode
5047 'viper-electric-mode
5053 'viper-vi-state-hook
5054 'viper-insert-state-hook
5055 'viper-replace-state-hook
5056 'viper-emacs-state-hook
5060 'major-mode