From: Pavel Janík <Pavel@Janik.cz>
Date: Wed, 8 May 2002 14:42:10 +0000 (+0000)
Subject: (Info-mode-map): Bind `c' to Info-copy-current-node-name.
X-Git-Tag: ttn-vms-21-2-B4~15145
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2ad631282de9153f26af91fe710e984b43f4c827;p=emacs.git

(Info-mode-map): Bind `c' to Info-copy-current-node-name.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3189447fee8..8540e3e670d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2002-05-08  Pavel Jan,Bm(Bk  <Pavel@Janik.cz>
+
+	* info.el (Info-mode-map): Bind `c' to Info-copy-current-node-name.
+
 2002-05-08  Richard M. Stallman  <rms@gnu.org>
 
 	* mail/smtpmail.el (netrc-machine, netrc-get): Add autoloads.
diff --git a/lisp/info.el b/lisp/info.el
index 4fe0970ea80..b8e91cc431b 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -2097,6 +2097,7 @@ If no reference to follow, moves to the next node, or up if none."
   (define-key Info-mode-map "<" 'Info-top-node)
   (define-key Info-mode-map ">" 'Info-final-node)
   (define-key Info-mode-map "b" 'beginning-of-buffer)
+  (define-key Info-mode-map "c" 'Info-copy-current-node-name)
   (define-key Info-mode-map "d" 'Info-directory)
   (define-key Info-mode-map "e" 'Info-edit)
   (define-key Info-mode-map "f" 'Info-follow-reference)