Mercurial > emacs
comparison lisp/progmodes/icon.el @ 2307:10e417efb12a
Added or corrected Commentary sections
author | Eric S. Raymond <esr@snark.thyrsus.com> |
---|---|
date | Mon, 22 Mar 1993 03:27:18 +0000 |
parents | 213978acbc1e |
children | 2e089bdec449 |
comparison
equal
deleted
inserted
replaced
2306:59c8668f70c7 | 2307:10e417efb12a |
---|---|
22 ;; along with GNU Emacs; see the file COPYING. If not, write to | 22 ;; along with GNU Emacs; see the file COPYING. If not, write to |
23 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. | 23 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. |
24 | 24 |
25 ;;; Commentary: | 25 ;;; Commentary: |
26 | 26 |
27 ;; A major mode for editing the Icon programming language. | |
28 ;; | |
27 ;; Note: use | 29 ;; Note: use |
28 ;; (autoload 'icon-mode "icon" nil t) | 30 ;; (autoload 'icon-mode "icon" nil t) |
29 ;; (setq auto-mode-alist (cons '("\\.icn$" . icon-mode) auto-mode-alist)) | 31 ;; (setq auto-mode-alist (cons '("\\.icn$" . icon-mode) auto-mode-alist)) |
30 ;; if not permanently installed in your emacs | 32 ;; if not permanently installed in your emacs |
31 | 33 |
144 (setq comment-end "") | 146 (setq comment-end "") |
145 (make-local-variable 'comment-column) | 147 (make-local-variable 'comment-column) |
146 (setq comment-column 32) | 148 (setq comment-column 32) |
147 (make-local-variable 'comment-start-skip) | 149 (make-local-variable 'comment-start-skip) |
148 (setq comment-start-skip "# *") | 150 (setq comment-start-skip "# *") |
149 (make-local-variable 'comment-indent-hook) | 151 (make-local-variable 'comment-indent-function) |
150 (setq comment-indent-hook 'icon-comment-indent) | 152 (setq comment-indent-function 'icon-comment-indent) |
151 (run-hooks 'icon-mode-hook)) | 153 (run-hooks 'icon-mode-hook)) |
152 | 154 |
153 ;; This is used by indent-for-comment to decide how much to | 155 ;; This is used by indent-for-comment to decide how much to |
154 ;; indent a comment in Icon code based on its context. | 156 ;; indent a comment in Icon code based on its context. |
155 (defun icon-comment-indent () | 157 (defun icon-comment-indent () |