(Info-bookmark-make-record): Document this function.

(Info-bookmark-jump): Document with a doc string, not just a comment.
(Bug#4061)

2 files changed, 10 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a257addb19a..2f65655e4ab 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2009-10-04  Karl Fogel  <kfogel@red-bean.com>
+
+        * info.el (Info-bookmark-make-record): Document this function.
+        (Info-bookmark-jump): Document with a doc string, not just a comment.
+        (Bug#4203)
+
 2009-10-04  Chong Yidong  <cyd@stupidchicken.com>
 
         * cedet/semantic.el (semantic-new-buffer-setup-functions): New
diff --git a/lisp/info.el b/lisp/info.el
index 7ee5516aa45..db26bbd8b3e 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -4769,6 +4769,8 @@ BUFFER is the buffer speedbar is requesting buttons for."
 (declare-function bookmark-get-bookmark-record "bookmark" (bmk))
 
 (defun Info-bookmark-make-record ()
+  "This implements the `bookmark-make-record-function' type (which see)
+for Info nodes."
   `(,Info-current-node
     ,@(bookmark-make-record-default 'point-only)
     (filename . ,Info-current-file)
@@ -4777,8 +4779,8 @@ BUFFER is the buffer speedbar is requesting buttons for."
 
 ;;;###autoload
 (defun Info-bookmark-jump (bmk)
-  ;; This implements the `handler' function interface for record type returned
-  ;; by `Info-bookmark-make-record', which see.
+  "This implements the `handler' function interface for the record
+type returned by `Info-bookmark-make-record', which see."
   (let* ((file                   (bookmark-prop-get bmk 'filename))
          (info-node              (bookmark-prop-get bmk 'info-node))
          (buf (save-window-excursion    ;FIXME: doesn't work with frames!