Mercurial > emacs

comparison lisp/progmodes/cperl-mode.el @ 32880:4092dea6659b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(cperl-mode): Set normal-auto-fill-function correctly.
author Dave Love <fx@gnu.org>
date Wed, 25 Oct 2000 13:36:48 +0000
parents 50345ac8da59
children 587807c5e8e6
comparison
equal deleted inserted replaced
32879:e179a37546cc 32880:4092dea6659b
1508 (if cperl-syntaxify-by-font-lock 1508 (if cperl-syntaxify-by-font-lock
1509 '(t (cperl-fontify-syntaxically)) 1509 '(t (cperl-fontify-syntaxically))
1510 '(t))))) 1510 '(t)))))
1511 (make-local-variable 'cperl-old-style) 1511 (make-local-variable 'cperl-old-style)
1512 (set (make-local-variable 'normal-auto-fill-function) 1512 (set (make-local-variable 'normal-auto-fill-function)
1513 #'cperl-old-auto-fill-mode) 1513 #'cperl-do-auto-fill)
1514 (if (cperl-enable-font-lock) 1514 (if (cperl-enable-font-lock)
1515 (if (cperl-val 'cperl-font-lock) 1515 (if (cperl-val 'cperl-font-lock)
1516 (progn (or cperl-faces-init (cperl-init-faces)) 1516 (progn (or cperl-faces-init (cperl-init-faces))
1517 (font-lock-mode 1)))) 1517 (font-lock-mode 1))))
1518 (and (boundp 'msb-menu-cond) 1518 (and (boundp 'msb-menu-cond)