From: Stefan Monnier Date: Mon, 3 Jan 2005 22:05:12 +0000 (+0000) Subject: (find-variable-regexp): Avoid defface. X-Git-Tag: ttn-vms-21-2-B4~2946 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1b60b25ac3554a6b70f553f8d227acac9255b6e1;p=emacs.git (find-variable-regexp): Avoid defface. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7ad139850ba..f53277edaa4 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2005-01-03 Stefan Monnier + * emacs-lisp/find-func.el (find-variable-regexp): Avoid defface. + * progmodes/perl-mode.el (perl-nochange, perl-calculate-indent): Don't confuse module-prefixed identifiers for labels. Reported by Juan-Leon Lahoz Garcia . diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el index a70adb4d423..8b3125db50b 100644 --- a/lisp/emacs-lisp/find-func.el +++ b/lisp/emacs-lisp/find-func.el @@ -1,6 +1,6 @@ ;;; find-func.el --- find the definition of the Emacs Lisp function near point -;; Copyright (C) 1997, 1999, 2001, 2004 Free Software Foundation, Inc. +;; Copyright (C) 1997, 1999, 2001, 2004, 2005 Free Software Foundation, Inc. ;; Author: Jens Petersen ;; Maintainer: petersen@kurims.kyoto-u.ac.jp @@ -76,10 +76,10 @@ Please send improvements and fixes to the maintainer." :version "21.1") (defcustom find-variable-regexp - (concat"^\\s-*(def[^umag]\\(\\w\\|\\s_\\)+\\*?" find-function-space-re "%s\\(\\s-\\|$\\)") + (concat"^\\s-*(def[^fumag]\\(\\w\\|\\s_\\)+\\*?" find-function-space-re "%s\\(\\s-\\|$\\)") "The regexp used by `find-variable' to search for a variable definition. It should match right up to the variable name. The default value -avoids `defun', `defmacro', `defalias', `defadvice', `defgroup'. +avoids `defun', `defmacro', `defalias', `defadvice', `defgroup', `defface'. Please send improvements and fixes to the maintainer." :type 'regexp @@ -437,5 +437,5 @@ Point is saved if FUNCTION is in the current buffer." (provide 'find-func) -;;; arch-tag: 43ecd81c-74dc-4d9a-8f63-a61e55670d64 +;; arch-tag: 43ecd81c-74dc-4d9a-8f63-a61e55670d64 ;;; find-func.el ends here