From: Richard M. Stallman Date: Mon, 11 Sep 2006 19:05:46 +0000 (+0000) Subject: (next-error-highlight, next-error-highlight-no-select): X-Git-Tag: emacs-pretest-22.0.90~612 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6d3c944b15419394c40e927c463b9c0114c22043;p=emacs.git (next-error-highlight, next-error-highlight-no-select): Fix custom type and doc strings. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ddada13d17b..efff4c2d2d7 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2006-09-11 Richard Stallman + + * simple.el (next-error-highlight, next-error-highlight-no-select): + Fix custom type and doc strings. + 2006-09-11 Stefan Monnier * diff-mode.el (diff-apply-hunk-to-backup-file): New var. diff --git a/lisp/simple.el b/lisp/simple.el index 8cade1f41b5..6533255357f 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -131,26 +131,26 @@ If no other buffer exists, the buffer `*scratch*' is returned." (defcustom next-error-highlight 0.1 "*Highlighting of locations in selected source buffers. If number, highlight the locus in `next-error' face for given time in seconds. -If t, use persistent overlays fontified in `next-error' face. +If t, highlight the locus indefinitely until some other locus replaces it. If nil, don't highlight the locus in the source buffer. If `fringe-arrow', indicate the locus by the fringe arrow." - :type '(choice (number :tag "Delay") - (const :tag "Persistent overlay" t) + :type '(choice (number :tag "Highlight for specified time") + (const :tag "Semipermantent highlighting" t) (const :tag "No highlighting" nil) - (const :tag "Fringe arrow" 'fringe-arrow)) + (const :tag "Fringe arrow" fringe-arrow)) :group 'next-error :version "22.1") (defcustom next-error-highlight-no-select 0.1 "*Highlighting of locations in non-selected source buffers. If number, highlight the locus in `next-error' face for given time in seconds. -If t, use persistent overlays fontified in `next-error' face. +If t, highlight the locus indefinitely until some other locus replaces it. If nil, don't highlight the locus in the source buffer. If `fringe-arrow', indicate the locus by the fringe arrow." - :type '(choice (number :tag "Delay") - (const :tag "Persistent overlay" t) + :type '(choice (number :tag "Highlight for specified time") + (const :tag "Semipermantent highlighting" t) (const :tag "No highlighting" nil) - (const :tag "Fringe arrow" 'fringe-arrow)) + (const :tag "Fringe arrow" fringe-arrow)) :group 'next-error :version "22.1")