comparison lisp/progmodes/sh-script.el @ 49743:99784a2bc919

(sh-mode-map): Don't remap beginning-of-defun to the non-existing command sh-beginning-of-compound-command.
author Andreas Schwab <schwab@suse.de>
date Wed, 12 Feb 2003 10:21:06 +0000
parents ed0ec7e165de
children 575ad90ca254 d7ddb3e565de
comparison
equal deleted inserted replaced
49742:2fc9fb53dc4f 49743:99784a2bc919
447 (define-key map [remap complete-tag] 'comint-dynamic-complete) 447 (define-key map [remap complete-tag] 'comint-dynamic-complete)
448 (define-key map [remap newline-and-indent] 'sh-newline-and-indent) 448 (define-key map [remap newline-and-indent] 'sh-newline-and-indent)
449 (define-key map [remap delete-backward-char] 449 (define-key map [remap delete-backward-char]
450 'backward-delete-char-untabify) 450 'backward-delete-char-untabify)
451 (define-key map "\C-c:" 'sh-set-shell) 451 (define-key map "\C-c:" 'sh-set-shell)
452 (define-key map [remap beginning-of-defun]
453 'sh-beginning-of-compound-command)
454 (define-key map [remap backward-sentence] 'sh-beginning-of-command) 452 (define-key map [remap backward-sentence] 'sh-beginning-of-command)
455 (define-key map [remap forward-sentence] 'sh-end-of-command) 453 (define-key map [remap forward-sentence] 'sh-end-of-command)
456 (define-key map [menu-bar insert] (cons "Insert" menu-map)) 454 (define-key map [menu-bar insert] (cons "Insert" menu-map))
457 (define-key menu-map [sh-while] '("While Loop" . sh-while)) 455 (define-key menu-map [sh-while] '("While Loop" . sh-while))
458 (define-key menu-map [sh-until] '("Until Loop" . sh-until)) 456 (define-key menu-map [sh-until] '("Until Loop" . sh-until))