aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDave Love2000-10-25 13:41:19 +0000
committerDave Love2000-10-25 13:41:19 +0000
commit072cb6f926fdf8a5b756a5725a5742995e2fc6b0 (patch)
tree63084246a26a2330962a05c616c999ea259b6822
parentd5789b65af2b248c62a703aa9af87aa4f7350823 (diff)
downloademacs-072cb6f926fdf8a5b756a5725a5742995e2fc6b0.tar.gz
emacs-072cb6f926fdf8a5b756a5725a5742995e2fc6b0.zip
(cperl-mode): Set
normal-auto-fill-function correctly.
-rw-r--r--lisp/ChangeLog3
-rw-r--r--lisp/progmodes/cperl-mode.el2
2 files changed, 4 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 870fa2bc33a..7060060c815 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -18,6 +18,9 @@
18 18
192000-10-25 Dave Love <fx@gnu.org> 192000-10-25 Dave Love <fx@gnu.org>
20 20
21 * progmodes/cperl-mode.el (cperl-mode): Set
22 normal-auto-fill-function correctly.
23
21 * wid-edit.el (widget-field-keymap, widget-text-keymap): Don't 24 * wid-edit.el (widget-field-keymap, widget-text-keymap): Don't
22 inherit from global-map and don't nullify menu-bar and tool-bar 25 inherit from global-map and don't nullify menu-bar and tool-bar
23 bindings since keymap properties DTRT. 26 bindings since keymap properties DTRT.
diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el
index 64b6574d0d2..9c88cdde6c1 100644
--- a/lisp/progmodes/cperl-mode.el
+++ b/lisp/progmodes/cperl-mode.el
@@ -1510,7 +1510,7 @@ or as help on variables `cperl-tips', `cperl-problems',
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))