Mercurial > emacs
changeset 79290:38be7cabc3fb
(strokes-alphabetic-lessp): Doc fix.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Wed, 31 Oct 2007 13:03:10 +0000 |
| parents | a6f04138250e |
| children | 9f847e38fd02 |
| files | lisp/strokes.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/strokes.el Wed Oct 31 12:46:29 2007 +0000 +++ b/lisp/strokes.el Wed Oct 31 13:03:10 2007 +0000 @@ -1370,7 +1370,7 @@ (goto-char (point-min)))) (defun strokes-alphabetic-lessp (stroke1 stroke2) - "T if command name for STROKE1 is less than STROKE2's in lexicographic order." + "Return t if STROKE1's command name precedes STROKE2's in lexicographic order." (let ((command-name-1 (symbol-name (cdr stroke1))) (command-name-2 (symbol-name (cdr stroke2)))) (string-lessp command-name-1 command-name-2)))