Mercurial > emacs
changeset 38176:2a85f8119924
(glasses-make-readable): Consider
underscores too when separating a parenthesis.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Mon, 25 Jun 2001 10:03:54 +0000 |
| parents | 8976a1349254 |
| children | c6545dffc123 |
| files | lisp/progmodes/glasses.el |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/glasses.el Sun Jun 24 13:16:33 2001 +0000 +++ b/lisp/progmodes/glasses.el Mon Jun 25 10:03:54 2001 +0000 @@ -1,9 +1,9 @@ ;;; glasses.el --- make cantReadThis readable -;; Copyright (C) 1999, 2000 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001 Free Software Foundation, Inc. -;; Author: Milan Zamazal <pdm@freesoft.cz> -;; Maintainer: Milan Zamazal <pdm@freesoft.cz> +;; Author: Milan Zamazal <pdm@zamazal.org> +;; Maintainer: Milan Zamazal <pdm@zamazal.org> ;; Keywords: tools ;; This file is part of GNU Emacs. @@ -198,7 +198,7 @@ ;; Parentheses (when glasses-separate-parentheses-p (goto-char beg) - (while (re-search-forward "[a-zA-Z]\\(\(\\)" end t) + (while (re-search-forward "[a-zA-Z]_*\\(\(\\)" end t) (glasses-make-overlay (match-beginning 1) (match-end 1) 'glasses-parenthesis)))))))