diff options
| author | Harald Jörg <haj@posteo.de> | 2021-04-20 00:25:39 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2021-04-20 22:47:13 +0200 |
| commit | c4c9a60c1397f01f749e4aa3da8b85ad0bab20b6 (patch) | |
| tree | e9cc802c32a40b4e066aee418cbefadd1154b15e /lisp/progmodes/cperl-mode.el | |
| parent | ee5d6ae663d9538d96c476a32b34d99c199b0c27 (diff) | |
| download | emacs-c4c9a60c1397f01f749e4aa3da8b85ad0bab20b6.tar.gz emacs-c4c9a60c1397f01f749e4aa3da8b85ad0bab20b6.tar.bz2 emacs-c4c9a60c1397f01f749e4aa3da8b85ad0bab20b6.zip | |
cperl-mode: Avoid abbrev expansion in variable names
* lisp/progmodes/cperl-mode.el (cperl-electric-else): Don't expand
scalar variables like '$continue' as keywords. (Bug#47902)
* test/lisp/progmodes/cperl-mode-tests.el
(cperl-test-hyperactive-electric-else): Verify that keywords are
expanded but variable names aren't.
Diffstat (limited to 'lisp/progmodes/cperl-mode.el')
| -rw-r--r-- | lisp/progmodes/cperl-mode.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el index 7878e91096c..bff3e60e90e 100644 --- a/lisp/progmodes/cperl-mode.el +++ b/lisp/progmodes/cperl-mode.el @@ -2224,7 +2224,7 @@ Help message may be switched off by setting `cperl-message-electric-keyword' to nil." (let ((beg (point-at-bol))) (and (save-excursion - (backward-sexp 1) + (skip-chars-backward "[:alpha:]") (cperl-after-expr-p nil "{;:")) (save-excursion (not |