* info.el: Remove the `Info-beginning-of-buffer' function

This commit is contained in:
Lars Magne Ingebrigtsen 2011-08-02 17:21:07 +02:00
parent 2239d7d5ef
commit b96dec833c
2 changed files with 8 additions and 10 deletions

View file

@ -1,5 +1,8 @@
2011-08-02 Lars Magne Ingebrigtsen <larsi@gnus.org>
* info.el: Remove the `Info-beginning-of-buffer' function
(bug#8325).
* net/network-stream.el (network-stream-open-starttls): Use
`starttls-available-p' to see whether starttls.el can be used.

View file

@ -2789,11 +2789,6 @@ N is the digit argument used to invoke this command."
(goto-char (point-max)))))
(t (error "No previous nodes"))))
(defun Info-beginning-of-buffer ()
"Go to the beginnning of the buffer."
(interactive)
(goto-char (point-min)))
(defun Info-scroll-up ()
"Scroll one screenful forward in Info, considering all nodes as one sequence.
Once you scroll far enough in a node that its menu appears on the screen
@ -3655,7 +3650,7 @@ If FORK is non-nil, it is passed to `Info-goto-node'."
(defvar Info-mode-map
(let ((map (make-keymap)))
(suppress-keymap map)
(define-key map "." 'Info-beginning-of-buffer)
(define-key map "." 'beginning-of-buffer)
(define-key map " " 'Info-scroll-up)
(define-key map "\C-m" 'Info-follow-nearest-node)
(define-key map "\t" 'Info-next-reference)
@ -3676,8 +3671,8 @@ If FORK is non-nil, it is passed to `Info-goto-node'."
(define-key map "[" 'Info-backward-node)
(define-key map "<" 'Info-top-node)
(define-key map ">" 'Info-final-node)
(define-key map "b" 'Info-beginning-of-buffer)
(put 'Info-beginning-of-buffer :advertised-binding "b")
(define-key map "b" 'beginning-of-buffer)
(put 'beginning-of-buffer :advertised-binding "b")
(define-key map "d" 'Info-directory)
(define-key map "e" 'Info-edit)
(define-key map "f" 'Info-follow-reference)
@ -3731,7 +3726,7 @@ If FORK is non-nil, it is passed to `Info-goto-node'."
:help "Go backward one node, considering all as a sequence"]
["Forward" Info-forward-node
:help "Go forward one node, considering all as a sequence"]
["Beginning" Info-beginning-of-buffer
["Beginning" beginning-of-buffer
:help "Go to beginning of this node"]
["Top" Info-top-node
:help "Go to top node of file"]
@ -3937,7 +3932,7 @@ Moving within a node:
\\[Info-scroll-down] Normally, scroll backward. If the beginning of the buffer is
already visible, try to go to the previous menu entry, or up
if there is none.
\\[Info-beginning-of-buffer] Go to beginning of node.
\\[beginning-of-buffer] Go to beginning of node.
Advanced commands:
\\[Info-search] Search through this Info file for specified regexp,