Mercurial > emacs
changeset 99841:fd7d46b20afe
* 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.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Sun, 23 Nov 2008 05:48:41 +0000 |
| parents | 4681f328596c |
| children | 2fe0a3e0646b |
| files | lisp/ChangeLog lisp/allout.el lisp/vc-annotate.el |
| diffstat | 3 files changed, 15 insertions(+), 9 deletions(-) [+] |
line wrap: on
line diff
--- 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 <lekktu@gmail.com> + + * 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 <monnier@iro.umontreal.ca> * vc-hooks.el (vc-follow-link): Complete last change.
--- 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
--- 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 <http://www.gnu.org/licenses/>. ;;; 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)