[Emacs-diffs] Changes to emacs/lisp/info.el

[Juanma Barranquero]

Index: emacs/lisp/info.el
diff -c emacs/lisp/info.el:1.434 emacs/lisp/info.el:1.435
*** emacs/lisp/info.el:1.434    Mon Jul  4 02:12:31 2005
--- emacs/lisp/info.el  Mon Jul  4 09:36:02 2005
***************
*** 45,59 ****
  
  (defvar Info-history nil
    "Stack of info nodes user has visited.
! Each element of list is a list (FILENAME NODENAME BUFFERPOS).")
  
  (defvar Info-history-forward nil
    "Stack of info nodes user has visited with `Info-history-back' command.
! Each element of list is a list (FILENAME NODENAME BUFFERPOS).")
  
  (defvar Info-history-list nil
    "List of all info nodes user has visited.
! Each element of list is a list (FILENAME NODENAME).")
  
  (defcustom Info-enable-edit nil
    "*Non-nil means the \\<Info-mode-map>\\[Info-edit] command in Info can edit 
the current node.
--- 45,59 ----
  
  (defvar Info-history nil
    "Stack of info nodes user has visited.
! Each element of the stack is a list (FILENAME NODENAME BUFFERPOS).")
  
  (defvar Info-history-forward nil
    "Stack of info nodes user has visited with `Info-history-back' command.
! Each element of the stack is a list (FILENAME NODENAME BUFFERPOS).")
  
  (defvar Info-history-list nil
    "List of all info nodes user has visited.
! Each element of the list is a list (FILENAME NODENAME).")
  
  (defcustom Info-enable-edit nil
    "*Non-nil means the \\<Info-mode-map>\\[Info-edit] command in Info can edit 
the current node.
***************
*** 3609,3615 ****
      keymap)
    "Keymap to put on the Prev link in the text or the header line.")
  
- 
  (defvar Info-up-link-keymap
    (let ((keymap (make-sparse-keymap)))
      (define-key keymap [header-line mouse-1] 'Info-up)
--- 3609,3614 ----
***************
*** 4094,4101 ****
  
  (defun Info-speedbar-fetch-file-nodes (nodespec)
    "Fetch the subnodes from the info NODESPEC.
! NODESPEC is a string of the form: (file)node.
! Optional THISFILE represends the filename of"
    (save-excursion
      ;; Set up a buffer we can use to fake-out Info.
      (set-buffer (get-buffer-create "*info-browse-tmp*"))
--- 4093,4099 ----
  
  (defun Info-speedbar-fetch-file-nodes (nodespec)
    "Fetch the subnodes from the info NODESPEC.
! NODESPEC is a string of the form: (file)node."
    (save-excursion
      ;; Set up a buffer we can use to fake-out Info.
      (set-buffer (get-buffer-create "*info-browse-tmp*"))