# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 804394252 0
# Node ID aa25c9b2e0435f6fbaf4ccff220597f1b67380a7
# Parent  ee433b44920d73a5ab9d436db6a40960cc373af3
Bind f1 and help like C-h.

diff -r ee433b44920d -r aa25c9b2e043 lisp/help.el
--- a/lisp/help.el	Thu Jun 29 02:50:01 1995 +0000
+++ b/lisp/help.el	Thu Jun 29 02:50:52 1995 +0000
@@ -39,9 +39,13 @@
   "Keymap for help mode.")
 
 (define-key global-map (char-to-string help-char) 'help-command)
+(define-key global-map [help] 'help-command)
+(define-key global-map [f1] 'help-command)
 (fset 'help-command help-map)
 
 (define-key help-map (char-to-string help-char) 'help-for-help)
+(define-key help-map [help] 'help-for-help)
+(define-key help-map [f1] 'help-for-help)
 (define-key help-map "?" 'help-for-help)
 
 (define-key help-map "\C-c" 'describe-copying)