diff options
author | Chong Yidong <cyd@stupidchicken.com> | 2009-08-16 23:20:21 +0000 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2009-08-16 23:20:21 +0000 |
commit | 7a55c78b36ce856c2387c59a934097c99d7b6e97 (patch) | |
tree | bb26716c76c56a002f7f6df069abad3ba5a07078 /lisp | |
parent | 8c777c8de1a3270d3053235491f51a5cf8e6955b (diff) | |
download | emacs-7a55c78b36ce856c2387c59a934097c99d7b6e97.tar.gz emacs-7a55c78b36ce856c2387c59a934097c99d7b6e97.tar.bz2 emacs-7a55c78b36ce856c2387c59a934097c99d7b6e97.zip |
* progmodes/cperl-mode.el (cperl-electric-paren): Don't expand
abbrev (Bug#3943).
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/ChangeLog | 5 | ||||
-rw-r--r-- | lisp/progmodes/cperl-mode.el | 5 |
2 files changed, 8 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 8eabde083f7..0327630fbb2 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2009-08-16 Chong Yidong <cyd@stupidchicken.com> + + * progmodes/cperl-mode.el (cperl-electric-paren): Don't expand + abbrev (Bug#3943). + 2007-10-08 Ilya Zakharevich <ilyaz@cpan.org> * progmodes/cperl-mode.el: Merge upstream 6.2. diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el index a6f322145f5..d2b3c5d3791 100644 --- a/lisp/progmodes/cperl-mode.el +++ b/lisp/progmodes/cperl-mode.el @@ -2154,8 +2154,9 @@ See `cperl-electric-parens'." ;;(not (save-excursion (search-backward "#" beg t))) (if (eq last-command-event ?<) (progn - (and abbrev-mode ; later it is too late, may be after `for' - (expand-abbrev)) + ;; This code is too electric, see Bug#3943. + ;; (and abbrev-mode ; later it is too late, may be after `for' + ;; (expand-abbrev)) (cperl-after-expr-p nil "{;(,:=")) 1)) (progn |