Mercurial > emacs
comparison lisp/emacs-lisp/lisp-mode.el @ 99338:7de2c5feb821
* emacs-lisp/lisp-mode.el (lisp-mode): Remove bogus change from
2000-12-08 (bug#1297) :-O
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Mon, 03 Nov 2008 02:52:45 +0000 |
parents | ba612d934442 |
children | 8e62d2d05a4e |
comparison
equal
deleted
inserted
replaced
99337:da8137a2a0c2 | 99338:7de2c5feb821 |
---|---|
466 (setq mode-name "Lisp") | 466 (setq mode-name "Lisp") |
467 (lisp-mode-variables) | 467 (lisp-mode-variables) |
468 (make-local-variable 'comment-start-skip) | 468 (make-local-variable 'comment-start-skip) |
469 (setq comment-start-skip | 469 (setq comment-start-skip |
470 "\\(\\(^\\|[^\\\\\n]\\)\\(\\\\\\\\\\)*\\)\\(;+\\|#|\\) *") | 470 "\\(\\(^\\|[^\\\\\n]\\)\\(\\\\\\\\\\)*\\)\\(;+\\|#|\\) *") |
471 (make-local-variable 'font-lock-keywords-case-fold-search) | |
472 (setq font-lock-keywords-case-fold-search t) | |
473 (setq imenu-case-fold-search t) | 471 (setq imenu-case-fold-search t) |
474 (set-syntax-table lisp-mode-syntax-table) | 472 (set-syntax-table lisp-mode-syntax-table) |
475 (run-mode-hooks 'lisp-mode-hook)) | 473 (run-mode-hooks 'lisp-mode-hook)) |
476 (put 'lisp-mode 'find-tag-default-function 'lisp-find-tag-default) | 474 (put 'lisp-mode 'find-tag-default-function 'lisp-find-tag-default) |
477 | 475 |