handle subdirs

-Yosh
This commit is contained in:
Manish Singh 2001-01-21 23:24:26 +00:00
parent a2a7ab3ff9
commit ba9240ba69
2 changed files with 6 additions and 2 deletions

View File

@ -1,3 +1,7 @@
Sun Jan 21 15:23:27 PST 2001 Manish Singh <yosh@gimp.org>
* tools/pdbgen/enumgen.pl: handle subdirs
2001-01-21 Simon Budig <simon@gimp.org>
* app/pdb/README: Added another warning about autogenerated files

View File

@ -240,12 +240,12 @@ while (<>) {
$nicks = ",\n\t nicks => { " . $nicks . " }";
}
$ARGV =~ m@([^/]*)$@;
$ARGV =~ s@(?:(?:..|app)/)*@@;
$code .= <<ENTRY if !$skip;
: $enumname =>
: { contig => $contig,
: header => '$1',
: header => '$ARGV',
: symbols => [ qw($symbols) ],
: mapping => { $mapping }$nicks
: },