comparison lisp/emacs-lisp/lisp-mode.el @ 7301:edad1db699ab

(lisp-mode-variables): Added missing backslash to outline-regexp. Removed dublicate ";;; Code: " section separator.
author Richard M. Stallman <rms@gnu.org>
date Tue, 03 May 1994 23:59:48 +0000
parents 3b452d97f111
children 2c8b3c988b10
comparison
equal deleted inserted replaced
7300:cc7cd83ccf3f 7301:edad1db699ab
18 ;; GNU General Public License for more details. 18 ;; GNU General Public License for more details.
19 19
20 ;; You should have received a copy of the GNU General Public License 20 ;; You should have received a copy of the GNU General Public License
21 ;; along with GNU Emacs; see the file COPYING. If not, write to 21 ;; along with GNU Emacs; see the file COPYING. If not, write to
22 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. 22 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
23
24 ;;; Code:
25 23
26 ;;; Commentary: 24 ;;; Commentary:
27 25
28 ;; The base major mode for editing Lisp code (used also for Emacs Lisp). 26 ;; The base major mode for editing Lisp code (used also for Emacs Lisp).
29 ;; This mode is documented in the Emacs manual 27 ;; This mode is documented in the Emacs manual
94 (make-local-variable 'indent-region-function) 92 (make-local-variable 'indent-region-function)
95 (setq indent-region-function 'lisp-indent-region) 93 (setq indent-region-function 'lisp-indent-region)
96 (make-local-variable 'parse-sexp-ignore-comments) 94 (make-local-variable 'parse-sexp-ignore-comments)
97 (setq parse-sexp-ignore-comments t) 95 (setq parse-sexp-ignore-comments t)
98 (make-local-variable 'outline-regexp) 96 (make-local-variable 'outline-regexp)
99 (setq outline-regexp ";;; \|(....") 97 (setq outline-regexp ";;; \\|(....")
100 (make-local-variable 'comment-start) 98 (make-local-variable 'comment-start)
101 (setq comment-start ";") 99 (setq comment-start ";")
102 (make-local-variable 'comment-start-skip) 100 (make-local-variable 'comment-start-skip)
103 (setq comment-start-skip ";+ *") 101 (setq comment-start-skip ";+ *")
104 (make-local-variable 'comment-column) 102 (make-local-variable 'comment-column)