# HG changeset patch # User Juanma Barranquero # Date 1227419321 0 # Node ID fd7d46b20afe462eaf92e4dbd2a1f43c84072285 # Parent 4681f328596c502446df15f45839059af4ffb208 * allout.el (allout-mode): Fix typo in docstring. * vc-annotate.el (vc-annotate-warp-revision): Reflow docstring. (vc-annotate-very-old-color, vc-annotate-display): Fix docstring typos. diff -r 4681f328596c -r fd7d46b20afe lisp/ChangeLog --- a/lisp/ChangeLog Sun Nov 23 05:10:53 2008 +0000 +++ b/lisp/ChangeLog Sun Nov 23 05:48:41 2008 +0000 @@ -1,3 +1,10 @@ +2008-11-23 Juanma Barranquero + + * allout.el (allout-mode): Fix typo in docstring. + + * vc-annotate.el (vc-annotate-warp-revision): Reflow docstring. + (vc-annotate-very-old-color, vc-annotate-display): Fix docstring typos. + 2008-11-23 Stefan Monnier * vc-hooks.el (vc-follow-link): Complete last change. diff -r 4681f328596c -r fd7d46b20afe lisp/allout.el --- a/lisp/allout.el Sun Nov 23 05:10:53 2008 +0000 +++ b/lisp/allout.el Sun Nov 23 05:48:41 2008 +0000 @@ -1830,7 +1830,7 @@ this special translation, so you can use them to get out of the hot-spot and back to normal editing operation. -In allout-mode, the normal beginning-of-line command (\\[allout-beginning-of-line]]) is +In allout-mode, the normal beginning-of-line command (\\[allout-beginning-of-line]) is replaced with one that makes it easy to get to the hot-spot. If you repeat it immediately it cycles (if `allout-beginning-of-line-cycles' is set) to the beginning of the item and then, if you hit it again diff -r 4681f328596c -r fd7d46b20afe lisp/vc-annotate.el --- a/lisp/vc-annotate.el Sun Nov 23 05:10:53 2008 +0000 +++ b/lisp/vc-annotate.el Sun Nov 23 05:48:41 2008 +0000 @@ -23,7 +23,7 @@ ;; along with GNU Emacs. If not, see . ;;; Commentary: -;; +;; (require 'vc-hooks) (require 'vc) @@ -100,7 +100,7 @@ :group 'vc) (defcustom vc-annotate-very-old-color "#3F3FFF" - "Color for lines older than the current color range in \\[vc-annotate]]." + "Color for lines older than the current color range in \\[vc-annotate]." :type 'string :group 'vc) @@ -512,12 +512,11 @@ (defun vc-annotate-warp-revision (revspec) "Annotate the revision described by REVSPEC. -If REVSPEC is a positive integer, warp that many revisions -forward, if possible, otherwise echo a warning message. If -REVSPEC is a negative integer, warp that many revisions backward, +If REVSPEC is a positive integer, warp that many revisions forward, if possible, otherwise echo a warning message. If REVSPEC is a -string, then it describes a revision number, so warp to that -revision." +negative integer, warp that many revisions backward, if possible, +otherwise echo a warning message. If REVSPEC is a string, then it +describes a revision number, so warp to that revision." (if (not (equal major-mode 'vc-annotate-mode)) (message "Cannot be invoked outside of a vc annotate buffer") (let* ((buf (current-buffer)) @@ -591,7 +590,7 @@ (defun vc-annotate-display (ratio &optional offset) "Highlight `vc-annotate' output in the current buffer. -RATIO, is the expansion that should be applied to `vc-annotate-color-map'. +RATIO is the expansion that should be applied to `vc-annotate-color-map'. The annotations are relative to the current time, unless overridden by OFFSET." (when (/= ratio 1.0) (set (make-local-variable 'vc-annotate-color-map)