Mercurial > hg > xemacs-beta

comparison lisp/modes/scheme.el @ 161:28f395d8dc7a r20-3b7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b7
author cvs
date Mon, 13 Aug 2007 09:42:26 +0200
parents 25f70ba0133c
children
comparison
equal deleted inserted replaced
160:1c55655d6702 161:28f395d8dc7a
119 119
120 (defvar scheme-mode-line-process "") 120 (defvar scheme-mode-line-process "")
121 121
122 (defun scheme-mode-commands (map) 122 (defun scheme-mode-commands (map)
123 (define-key map "\t" 'scheme-indent-line) 123 (define-key map "\t" 'scheme-indent-line)
124 ;; GDF - Don't rebind the delete key
125 ;; (define-key map "\177" 'backward-delete-char-untabify)
126 (define-key map "\e\C-q" 'scheme-indent-sexp)) 124 (define-key map "\e\C-q" 'scheme-indent-sexp))
127 125
128 (defvar scheme-mode-map nil) 126 (defvar scheme-mode-map nil)
129 (if (not scheme-mode-map) 127 (if (not scheme-mode-map)
130 (progn 128 (progn