diff options
| author | Glenn Morris <rgm@gnu.org> | 2014-10-12 15:56:45 -0700 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2014-10-12 15:56:45 -0700 |
| commit | b1d5ab0352b6132eee4feaf9091ce7dc7a3e6a84 (patch) | |
| tree | df2e6708c30f53f071bd824c49c7f00dfbe0ffba /lisp/progmodes/prolog.el | |
| parent | ec11ab9b783fc1f2c0ce858a711baa5f728c238b (diff) | |
| parent | e175fabcdd37f89db13ab90615cf0baa7bade4d9 (diff) | |
| download | emacs-b1d5ab0352b6132eee4feaf9091ce7dc7a3e6a84.tar.gz | |
Merge from emacs-24; up to 2014-07-26T11:58:24Z!schwab@linux-m68k.org
Diffstat (limited to 'lisp/progmodes/prolog.el')
| -rw-r--r-- | lisp/progmodes/prolog.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/prolog.el b/lisp/progmodes/prolog.el index 853f2d0dad2..3f98708e2e3 100644 --- a/lisp/progmodes/prolog.el +++ b/lisp/progmodes/prolog.el @@ -3139,7 +3139,7 @@ the following comma and whitespace, if any." (eq (char-before) ?_) (save-excursion (skip-chars-backward "[:alpha:]_") - (looking-at "\\<_[_[:upper:]][[:alnum:]_]*\\_>"))) + (looking-at "\\_<[_[:upper:]][[:alnum:]_]*\\_>"))) (replace-match "_") (skip-chars-forward ", \t\n"))))) |