# HG changeset patch # User Karl Heuer # Date 824938154 0 # Node ID 7e5e4b8c8d1097380e99444edc1e2194fc3d751a # Parent f50f87fae91425fce6645a0b54cc08cdb9319b24 (perl-imenu-generic-expression): Recognize packages. diff -r f50f87fae914 -r 7e5e4b8c8d10 lisp/progmodes/perl-mode.el --- a/lisp/progmodes/perl-mode.el Wed Feb 21 21:28:57 1996 +0000 +++ b/lisp/progmodes/perl-mode.el Wed Feb 21 21:29:14 1996 +0000 @@ -154,6 +154,7 @@ (nil "^sub\\s-+\\([-A-Za-z0-9+_:]+\\)\\(\\s-\\|\n\\)*{" 1 ) ;;Variables ("Variables" "^\\([$@%][-A-Za-z0-9+_:]+\\)\\s-*=" 1 ) + ("Packages" "^package\\s-+\\([-A-Za-z0-9+_:]+\\);" 1 ) ) "Imenu generic expression for Perl mode. See `imenu-generic-expression'.")