(describe-minor-mode-completion-table-for-indicator,

lookup-minor-mode-from-indicator): "?\ " -> "?\s".

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