summaryrefslogtreecommitdiff
path: root/lisp/help.el
diff options
context:
space:
mode:
authorMiles Bader <miles@gnu.org>2006-12-07 04:14:14 +0000
committerMiles Bader <miles@gnu.org>2006-12-07 04:14:14 +0000
commita0451a715e4ed018a02b825d0eb823424693d1de (patch)
treed2b10fcc69c333ccc438d7a9ad116fbc1495fc9e /lisp/help.el
parentd324f894beea8b485792c779659e8e20c1cb699d (diff)
parent12f7728e938fe5bb850ce2928637d1e349919142 (diff)
downloademacs-a0451a715e4ed018a02b825d0eb823424693d1de.tar.gz
emacs-a0451a715e4ed018a02b825d0eb823424693d1de.tar.bz2
emacs-a0451a715e4ed018a02b825d0eb823424693d1de.zip
Merge from emacs--devo--0
Patches applied: * emacs--devo--0 (patch 523-544) - Update from CVS - Merge from gnus--rel--5.10 * gnus--rel--5.10 (patch 168-171) - Update from CVS - Merge from emacs--devo--0 Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-150
Diffstat (limited to 'lisp/help.el')
-rw-r--r--lisp/help.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/help.el b/lisp/help.el
index 08899d61415..8c0f92f48ff 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -887,7 +887,7 @@ appeared on the mode-line."
(cond
((= 0 (length i))
nil)
- ((eq (aref i 0) ?\ )
+ ((eq (aref i 0) ?\s)
(substring i 1))
(t
i))))
@@ -909,7 +909,7 @@ is currently activated with completion."
"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 @@ is currently activated with completion."
;; 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