sh-mode.el: sh-beginning-of-compound-command undefined

[Wolfgang Scherer]

Hi, this was nagging me now for a couple of years ;-)

In GNU Emacs 20.7.1 (i386-suse-linux, X toolkit)
 of Sam Jul 29 2000 on kneser
configured using `configure  --with-gcc --with-pop --with-system-malloc 
--prefix=/usr --exec-prefix=/usr --infodir=/usr/share/info 
--mandir=/usr/share/man --sharedstatedir=/var/state --libexecdir=/usr/lib 
--with-x --with-x-toolkit=lucid --x-includes=/usr/X11R6/include 
--x-libraries=/usr/X11R6/lib i386-suse-linux'

Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:

1. In the emacs lisp directory progmodes/sh-script.el says:

    (substitute-key-definition 'beginning-of-defun
                               'sh-beginning-of-compound-command
                               map (current-global-map))

2. When in sh-mode, pressing `C-home' (which is probably local to my
   setup) or `M-C-a' displays the message:

   Symbol's function definition is void: sh-beginning-of-compound-command

   (See `Recent input' and `Recent messages').

3. A grep-find in the emacs lisp directory shows, that there is no
   definition of sh-beginning-of-compound-command anywhere in the lisp
   source.

   find . -type f -print0 | xargs -0 -e grep -n -e 
sh-beginning-of-compound-command
   ./progmodes/sh-script.el:305:                               
'sh-beginning-of-compound-command

4. Since `beginning-of-defun' works just fine for me, I think it would
   be better to remove the (substitute-key-definition ...) instead of
   having no movement command at all ;-)

Recent input:
end switch-frame up up up up up up up up up up C-right 
C-right C-right C-left M-s M-x C-y return s h - m o 
d e SPC b u g : SPC switch-frame down-mouse-1 mouse-movement 
mouse-movement mouse-movement mouse-movement mouse-movement 
mouse-movement mouse-movement mouse-movement mouse-movement 
mouse-movement mouse-movement mouse-movement mouse-movement 
mouse-movement mouse-movement mouse-movement mouse-movement 
mouse-movement mouse-movement mouse-movement mouse-movement 
mouse-movement mouse-movement mouse-movement mouse-movement 
mouse-movement mouse-movement mouse-movement mouse-movement 
mouse-movement drag-mouse-1 switch-frame down-mouse-2 
mouse-2 SPC u n d e f i n e d return next prior C-x 
k return switch-frame f7 g down down down down down 
down down f M-C-a M-x M-p return

Recent messages:
Mark set
Mark saved where search started
Mark set [3 times]
Loading emacsbug...
Loading emacsbug...done
Fontifying message to bug-gnu-emacs@gnu.or...
Fontifying message to bug-gnu-emacs@gnu.or... (regexps........)
Auto-saving...
Fontifying message to bug-gnu-emacs@gnu.or... (regexps........)
Commands: d, s, x, u; f, o, 1, 2, m, v; ~, %; q to quit; ? for help.
Symbol's function definition is void: sh-beginning-of-compound-command