diff options
| author | Ilya Zakharevich <ilya@math.berkeley.edu> | 1998-07-06 16:59:10 -0400 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-07 22:11:11 +0000 |
| commit | 3419a968bbeefe011eeb78c3583a321853782e93 (patch) | |
| tree | 6fd475e15d1d3da610567ec9a21c2bea8c8a4c88 /emacs | |
| parent | ee027f1d663256f1223632e02ff1c8835809ce91 (diff) | |
| download | perl-3419a968bbeefe011eeb78c3583a321853782e93.tar.gz | |
Anohter ptags improvement
Message-Id: <199807070059.UAA28815@monk.mps.ohio-state.edu>
p4raw-id: //depot/perl@1360
Diffstat (limited to 'emacs')
| -rwxr-xr-x | emacs/ptags | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/emacs/ptags b/emacs/ptags index d8d4926227..c32a1289ec 100755 --- a/emacs/ptags +++ b/emacs/ptags @@ -18,7 +18,7 @@ if test ! -z "$OS2_SHELL"; then alias find=gnufind; fi # Insure proper order (.h after .c, .xs before .c in subdirs): -topfiles="`echo ' ' *.y *.c *.h ' ' | sed 's/ embed.h / /'`" +topfiles="`echo ' ' *.y *.c *.h ' ' | sed 's/ embed.h / /' | sed 's/ globals.c / /'`" subdirfiles="`( find ./*/* -name '*.[cy]' -print | sort ; find ./*/* -name '*.[hH]' -print | sort )`" xsfiles="`find . -name '*.xs' -print | sort`" @@ -48,6 +48,7 @@ etags -o TAGS.tmp \ config_h.SH etags -o TAGS.tmp -a "$@" $topfiles etags -o TAGS.tmp -a -D -l none -r '/#define.*\t\(Perl_.*\)/\1/' embed.h +etags -o TAGS.tmp -a globals.c perl -w014pe 'if (s/^( [^\n\x7F\x1]*\b # 1: TAG group (\w+) # 2: word |