/[emacs]/emacs/lisp/simple.el
ViewVC logotype

Diff of /emacs/lisp/simple.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.657 by eliz, Sat Sep 4 12:45:26 2004 UTC revision 1.658 by eliz, Sat Sep 4 13:04:49 2004 UTC
# Line 253  If `fringe-arrow', indicate the locus by Line 253  If `fringe-arrow', indicate the locus by
253  ;;; Internal variable for `next-error-follow-mode-post-command-hook'.  ;;; Internal variable for `next-error-follow-mode-post-command-hook'.
254  (defvar next-error-follow-last-line nil)  (defvar next-error-follow-last-line nil)
255    
256  (define-minor-mode next-error-follow-mode  (define-minor-mode next-error-follow-minor-mode
257    "Minor mode for compilation, occur and diff modes.    "Minor mode for compilation, occur and diff modes.
258  When turned on, cursor motion in the compilation, occur or diff  When turned on, cursor motion in the compilation, grep, occur or diff
259  buffer determines the cursor in the corresponding buffer to move  buffer causes automatic display of the corresponding source code
260  to the corresponding position.  "  location."
261    nil " Fol" nil    nil " Fol" nil
262    (if (not next-error-follow-mode)    (if (not next-error-follow-mode)
263        (remove-hook 'post-command-hook 'next-error-follow-mode-post-command-hook t)        (remove-hook 'post-command-hook 'next-error-follow-mode-post-command-hook t)

Legend:
Removed from v.1.657  
changed lines
  Added in v.1.658

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26