Mercurial > emacs
diff lisp/progmodes/icon.el @ 30947:3e2633195694
(icon-indent-line)
(icon-is-continuation-line): Handle comments specially.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Fri, 18 Aug 2000 06:29:14 +0000 |
parents | f3f9df46d008 |
children | d218ef159e45 |
line wrap: on
line diff
--- a/lisp/progmodes/icon.el Fri Aug 18 06:28:47 2000 +0000 +++ b/lisp/progmodes/icon.el Fri Aug 18 06:29:14 2000 +0000 @@ -295,7 +295,7 @@ (setq beg (point)) (cond ((eq indent nil) (setq indent (current-indentation))) - ((looking-at "[ \t]*#") + ((looking-at "^#") (setq indent 0)) (t (skip-chars-forward " \t") @@ -432,7 +432,7 @@ (progn (forward-word -1) (point)) (progn (forward-word 1) (point))) icon-resword-alist) - (not (memq ch '(0 ?\; ?\} ?\{ ?\) ?\] ?\" ?\' ?\n)))))) + (not (memq ch '(0 ?\; ?\} ?\{ ?\) ?\] ?\" ?\' ?\# ?\, ?\. ?\n)))))) (defun icon-backward-to-noncomment (lim) (let (opoint stop)