Mercurial > emacs
comparison lisp/progmodes/cfengine.el @ 54460:82f7cd1ab4eb
(cfengine-mode): Set parse-sexp-ignore-comments.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Sun, 21 Mar 2004 15:29:42 +0000 |
parents | 0746b84b7c15 |
children | 1af59a842b93 |
comparison
equal
deleted
inserted
replaced
54459:bdc0ecff8aec | 54460:82f7cd1ab4eb |
---|---|
237 (setq font-lock-defaults | 237 (setq font-lock-defaults |
238 '(cfengine-font-lock-keywords nil nil nil beginning-of-line)) | 238 '(cfengine-font-lock-keywords nil nil nil beginning-of-line)) |
239 (setq imenu-generic-expression cfengine-imenu-expression) | 239 (setq imenu-generic-expression cfengine-imenu-expression) |
240 (set (make-local-variable 'beginning-of-defun-function) | 240 (set (make-local-variable 'beginning-of-defun-function) |
241 #'cfengine-beginning-of-defun) | 241 #'cfengine-beginning-of-defun) |
242 (set (make-local-variable 'end-of-defun-function) #'cfengine-end-of-defun)) | 242 (set (make-local-variable 'end-of-defun-function) #'cfengine-end-of-defun) |
243 ;; Like Lisp mode. Without this, we lose with, say, | |
244 ;; `backward-up-list' when there's an unbalanced quote in a | |
245 ;; preceding comment. | |
246 (set (make-local-variable 'parse-sexp-ignore-comments) t)) | |
243 | 247 |
244 (provide 'cfengine) | 248 (provide 'cfengine) |
245 | 249 |
246 ;;; arch-tag: 6b931be2-1505-4124-afa6-9675971e26d4 | 250 ;;; arch-tag: 6b931be2-1505-4124-afa6-9675971e26d4 |
247 ;;; cfengine.el ends here | 251 ;;; cfengine.el ends here |