(Info-current-node): Remove.
authorStefan Monnier <monnier@iro.umontreal.ca>
Thu, 13 Mar 2008 01:57:05 +0000 (01:57 +0000)
committerStefan Monnier <monnier@iro.umontreal.ca>
Thu, 13 Mar 2008 01:57:05 +0000 (01:57 +0000)
lisp/ChangeLog
lisp/bookmark.el

index eded985..c60a2c4 100644 (file)
@@ -1,3 +1,7 @@
+2008-03-13  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * bookmark.el (Info-current-node): Remove.
+
 2008-03-12  Juri Linkov  <juri@jurta.org>
 
        * help.el (describe-project): Remove defaliases for view-todo and
@@ -24,7 +28,8 @@
        * comint.el: Fix up indentation and comment style.  Remove `function'.
 
        * international/mule-cmds.el (reset-language-environment)
-       (set-language-environment-nonascii-translation): Don't set-unibyte-charset.
+       (set-language-environment-nonascii-translation):
+       Don't set-unibyte-charset.
 
        * doc-view.el: Remove all cb-args, use closures instead.
        (doc-view-sentinel): Merge doc-view-dvi->pdf-sentinel,
index d8d90d6..5da231c 100644 (file)
@@ -297,7 +297,6 @@ through a file easier.")
 (defvar bookmark-yank-point 0)
 (defvar bookmark-current-buffer nil)
 
-(defvar Info-current-node)
 (defvar Info-suffix-list)
 \f
 ;; Helper functions.
@@ -850,8 +849,7 @@ Default to file name if it's nil."
 
 
 (defun bookmark-buffer-name ()
-  "Return the name of the current buffer's file, non-directory.
-In Info, return the current node."
+  "Return the name of the current buffer's file, non-directory."
   (cond
    ;; Or are we a file?
    (buffer-file-name (file-name-nondirectory buffer-file-name))
@@ -885,12 +883,8 @@ In Info, return the current node."
                        (setq bookmark-yank-point (point)))))))
     (insert string)))
 
-
-(defvar Info-current-file)
-
 (defun bookmark-buffer-file-name ()
-  "Return the current buffer's file in a way useful for bookmarks.
-For example, if this is a Info buffer, return the Info file's name."
+  "Return the current buffer's file in a way useful for bookmarks."
   (cond
    (buffer-file-name
     ;; Abbreviate the path, both so it's shorter and so it's more