# HG changeset patch # User Juanma Barranquero # Date 1164635547 0 # Node ID 274336dd0ead1ab8296376844ac34848f9da760d # Parent 99a4797cbaf6892f7f224d5b9a21a203b0f6aa9b (describe-minor-mode-completion-table-for-indicator, lookup-minor-mode-from-indicator): "?\ " -> "?\s". diff -r 99a4797cbaf6 -r 274336dd0ead lisp/help.el --- 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