From: Juanma Barranquero Date: Sun, 23 Nov 2008 05:48:41 +0000 (+0000) Subject: * allout.el (allout-mode): Fix typo in docstring. X-Git-Tag: emacs-pretest-23.0.90~1601 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d41b91e6955481a6f8046647242c504195eb90fb;p=emacs.git * 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 --git a/lisp/ChangeLog b/lisp/ChangeLog index 19f3ac209fa..090df75024f 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -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 --git a/lisp/allout.el b/lisp/allout.el index dd954b748f1..0c60e5424d0 100644 --- a/lisp/allout.el +++ b/lisp/allout.el @@ -1830,7 +1830,7 @@ single keystroke. Regular navigation keys (eg, \\[forward-char], \\[next-line]) 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 --git a/lisp/vc-annotate.el b/lisp/vc-annotate.el index 31a82f95a98..9a0e2be7fda 100644 --- a/lisp/vc-annotate.el +++ b/lisp/vc-annotate.el @@ -23,7 +23,7 @@ ;; along with GNU Emacs. If not, see . ;;; Commentary: -;; +;; (require 'vc-hooks) (require 'vc) @@ -100,7 +100,7 @@ all other colors between (excluding black and white)." :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 @@ revisions after." (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 @@ or OFFSET if present." (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)