diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2014-04-21 16:31:22 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2014-04-21 16:31:22 -0400 |
| commit | f0ffb9b76754ef7dcc4842e969aa16d451f117e9 (patch) | |
| tree | 49c7b7785278e25f8eb3f799eb51331616660537 /lisp/progmodes/prog-mode.el | |
| parent | 6709d4dab9d434dcd1d797e081dfc796b735a1ff (diff) | |
| download | emacs-f0ffb9b76754ef7dcc4842e969aa16d451f117e9.tar.gz | |
* lisp/progmodes/prog-mode.el (prettify-symbols--compose-symbol):
Don't prettify a word within a symbol.
Diffstat (limited to 'lisp/progmodes/prog-mode.el')
| -rw-r--r-- | lisp/progmodes/prog-mode.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/prog-mode.el b/lisp/progmodes/prog-mode.el index 3b850f3305b..407466932d9 100644 --- a/lisp/progmodes/prog-mode.el +++ b/lisp/progmodes/prog-mode.el @@ -67,7 +67,7 @@ Regexp match data 0 points to the chars." (let* ((start (match-beginning 0)) (end (match-end 0)) (syntaxes (if (eq (char-syntax (char-after start)) ?w) - '(?w) '(?. ?\\))) + '(?w ?_) '(?. ?\\))) match) (if (or (memq (char-syntax (or (char-before start) ?\s)) syntaxes) (memq (char-syntax (or (char-after end) ?\s)) syntaxes) |