Mercurial > emacs
changeset 39088:2fc21ed3beac
(glasses-convert-to-unreadable): Consider
underscores as in `glasses-make-readable'.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Mon, 03 Sep 2001 08:20:54 +0000 |
| parents | 7eeeae13a5ef |
| children | 64e39b9789cc |
| files | lisp/progmodes/glasses.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/glasses.el Mon Sep 03 08:03:53 2001 +0000 +++ b/lisp/progmodes/glasses.el Mon Sep 03 08:20:54 2001 +0000 @@ -229,7 +229,7 @@ (goto-char (match-end n)))) (when glasses-separate-parentheses-p (goto-char (point-min)) - (while (re-search-forward "[a-zA-Z]\\( \\)\(" nil t) + (while (re-search-forward "[a-zA-Z]_*\\( \\)\(" nil t) (replace-match "" t nil nil 1)))))) ;; nil must be returned to allow use in write file hooks nil)