Mercurial > hg > xemacs-beta
comparison lisp/lisp-mode.el @ 1428:10738b72057d
[xemacs-hg @ 2003-04-24 05:29:11 by youngs]
2003-04-24 Steve Youngs <youngs@xemacs.org>
* font-lock.el (font-lock-match-java-declarations): Move
save-restriction, narrow-to-region to beginning of function to
avoid going beyond the limit and causing an infloop.
From Jin Choi <jsc@orangeimagineering.com>.
2003-04-24 Vasily Korytov <deskpot@myrealbox.com>
* lisp-mode.el (emacs-lisp-mode-hook, lisp-mode-hook,
lisp-interaction-mode-hook): Add the docstrings.
| author | youngs |
|---|---|
| date | Thu, 24 Apr 2003 05:29:12 +0000 |
| parents | 1b0339b048ce |
| children | ce294639d321 |
comparison
equal
deleted
inserted
replaced
| 1427:5d62849e7275 | 1428:10738b72057d |
|---|---|
| 264 (define-key emacs-lisp-mode-map "\e\t" 'lisp-complete-symbol) | 264 (define-key emacs-lisp-mode-map "\e\t" 'lisp-complete-symbol) |
| 265 (define-key emacs-lisp-mode-map "\e\C-x" 'eval-defun) | 265 (define-key emacs-lisp-mode-map "\e\C-x" 'eval-defun) |
| 266 ;; XEmacs: Not sure what the FSF menu bindings are. I hope XEmacs | 266 ;; XEmacs: Not sure what the FSF menu bindings are. I hope XEmacs |
| 267 ;; doesn't need them. | 267 ;; doesn't need them. |
| 268 ) | 268 ) |
| 269 | |
| 270 ;; XEmacs: add docstrings to the hooks | |
| 271 (defvar emacs-lisp-mode-hook nil | |
| 272 "Hook to run when entering emacs-lisp-mode.") | |
| 273 | |
| 274 (defvar lisp-mode-hook nil | |
| 275 "Hook to run when entering lisp-mode.") | |
| 276 | |
| 277 (defvar lisp-interaction-mode-hook nil | |
| 278 "Hook to run when entering lisp-interaction-mode.") | |
| 269 | 279 |
| 270 (defun emacs-lisp-byte-compile () | 280 (defun emacs-lisp-byte-compile () |
| 271 "Byte compile the file containing the current buffer." | 281 "Byte compile the file containing the current buffer." |
| 272 (interactive) | 282 (interactive) |
| 273 (if buffer-file-name | 283 (if buffer-file-name |