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)))))))