Mercurial > emacs
changeset 74230:274336dd0ead
(describe-minor-mode-completion-table-for-indicator,
lookup-minor-mode-from-indicator): "?\ " -> "?\s".
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Mon, 27 Nov 2006 13:52:27 +0000 |
| parents | 99a4797cbaf6 |
| children | 0b8c05c54956 |
| files | lisp/help.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/help.el Mon Nov 27 13:51:41 2006 +0000 +++ b/lisp/help.el Mon Nov 27 13:52:27 2006 +0000 @@ -887,7 +887,7 @@ (cond ((= 0 (length i)) nil) - ((eq (aref i 0) ?\ ) + ((eq (aref i 0) ?\s) (substring i 1)) (t i)))) @@ -909,7 +909,7 @@ "Return a minor mode symbol from its indicator on the modeline." ;; remove first space if existed (if (and (< 0 (length indicator)) - (eq (aref indicator 0) ?\ )) + (eq (aref indicator 0) ?\s)) (setq indicator (substring indicator 1))) (let ((minor-modes minor-mode-alist) result) @@ -920,7 +920,7 @@ ;; remove first space if existed (if (and (stringp anindicator) (> (length anindicator) 0) - (eq (aref anindicator 0) ?\ )) + (eq (aref anindicator 0) ?\s)) (setq anindicator (substring anindicator 1))) (if (equal indicator anindicator) (setq result minor-mode