/[emacs]/emacs/lisp/progmodes/perl-mode.el
ViewVC logotype

Diff of /emacs/lisp/progmodes/perl-mode.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.55 by monnier, Sun Mar 20 18:04:41 2005 UTC revision 1.56 by monnier, Tue Mar 22 19:43:13 2005 UTC
# Line 207  The expansion is entirely correct becaus Line 207  The expansion is entirely correct becaus
207      '("\\<\\(local\\|my\\)\\>" . font-lock-type-face)      '("\\<\\(local\\|my\\)\\>" . font-lock-type-face)
208      ;;      ;;
209      ;; Fontify function, variable and file name references.      ;; Fontify function, variable and file name references.
210      '("&\\(\\sw+\\)" 1 font-lock-function-name-face)      '("&\\(\\sw+\\(::\\sw+\\)*\\)" 1 font-lock-function-name-face)
211      ;; Additionally underline non-scalar variables.  Maybe this is a bad idea.      ;; Additionally underline non-scalar variables.  Maybe this is a bad idea.
212      ;;'("[$@%*][#{]?\\(\\sw+\\)" 1 font-lock-variable-name-face)      ;;'("[$@%*][#{]?\\(\\sw+\\)" 1 font-lock-variable-name-face)
213      '("[$*]{?\\(\\sw+\\)" 1 font-lock-variable-name-face)      '("[$*]{?\\(\\sw+\\(::\\sw+\\)*\\)" 1 font-lock-variable-name-face)
214      '("\\([@%]\\|\\$#\\)\\(\\sw+\\)"      '("\\([@%]\\|\\$#\\)\\(\\sw+\\(::\\sw+\\)*\\)"
215        (2 (cons font-lock-variable-name-face '(underline))))        (2 (cons font-lock-variable-name-face '(underline))))
216      '("<\\(\\sw+\\)>" 1 font-lock-constant-face)      '("<\\(\\sw+\\)>" 1 font-lock-constant-face)
217      ;;      ;;

Legend:
Removed from v.1.55  
changed lines
  Added in v.1.56

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26