(Info-unescape-quotes, Info-split-parameter-string)

(Info-goto-emacs-command-node): Doc fixes.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8b8178dcfbc379ac6e6018133ab0eb0199e5fb97..6d4177138df6a92e102115247780b6cbfa3b4c46 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-12-23  John Paul Wallington  <jpw@gnu.org>
+
+       * info.el (Info-unescape-quotes, Info-split-parameter-string)
+       (Info-goto-emacs-command-node): Doc fixes.
+
 2003-12-03  Kenichi Handa  <handa@m17n.org>
 
        * language/cyrillic.el: Register "microsoft-cp1251" in

diff --git a/lisp/info.el b/lisp/info.el
index 47af5bb8154ed095b2ff15d4b666be7e53d53434..9616dbb1feb2e45843930147febd45319f95ef49 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1086,7 +1086,7 @@ a case-insensitive match is tried."
        (+ (- nodepos lastfilepos) (point)))))
 
 (defun Info-unescape-quotes (value)
-  "Unescape double quotes and backslashes in VALUE"
+  "Unescape double quotes and backslashes in VALUE."
   (let ((start 0)
        (unquote value))
     (while (string-match "[^\\\"]*\\(\\\\\\)[\\\\\"]" unquote start)
@@ -1099,10 +1099,9 @@ a case-insensitive match is tried."
 ;; into the Info file for handling images.
 (defun Info-split-parameter-string (parameter-string)
   "Return alist of (\"KEY\" . \"VALUE\") from PARAMETER-STRING; a
-   whitespace separated list of KEY=VALUE pairs.  If VALUE
-   contains whitespace or double quotes, it must be quoted in
-   double quotes and any double quotes or backslashes must be
-   escaped (\\\",\\\\)."
+whitespace separated list of KEY=VALUE pairs.  If VALUE contains
+whitespace or double quotes, it must be quoted in double quotes and
+any double quotes or backslashes must be escaped (\\\",\\\\)."
   (let ((start 0)
        (parameter-alist))
     (while (string-match
@@ -2683,12 +2682,12 @@ The locations are of the format used in `Info-history', i.e.
   "Go to the Info node in the Emacs manual for command COMMAND.
 The command is found by looking up in Emacs manual's indices
 or in another manual found via COMMAND's `info-file' property or
-the variable `Info-file-list-for-emacs'. COMMAND must be a symbol
-or string."
+the variable `Info-file-list-for-emacs'.
+COMMAND must be a symbol or string."
   (interactive "CFind documentation for command: ")
   ;; If command is given as a string, convert it to a symbol.
   (if (stringp command)
-      (setq command (intern command)))  
+      (setq command (intern command)))
   (or (commandp command)
       (signal 'wrong-type-argument (list 'commandp command)))
   (let ((where (Info-find-emacs-command-nodes command)))
@@ -2785,9 +2784,9 @@ Preserve text properties."
        (setq mb (match-beginning 0)
              me (1+ mb)
              m (substring string mb me)
-             matches (cons m 
-                           (cons m 
-                                 (cons (substring string start mb) 
+             matches (cons m
+                           (cons m
+                                 (cons (substring string start mb)
                                        matches)))
              start me))
       (push (substring string start end) matches)