cvs commit: parrot/classes pmc2c2.pl

[Leopold Toetsch]

cvsuser     03/12/03 08:37:04

  Modified:    classes  pmc2c2.pl
  Log:
  glob files for Win
  
  Revision  Changes    Path
  1.4       +2 -0      parrot/classes/pmc2c2.pl
  
  Index: pmc2c2.pl
  ===================================================================
  RCS file: /cvs/public/parrot/classes/pmc2c2.pl,v
  retrieving revision 1.3
  retrieving revision 1.4
  diff -u -w -r1.3 -r1.4
  --- pmc2c2.pl 3 Dec 2003 11:28:55 -0000       1.3
  +++ pmc2c2.pl 3 Dec 2003 16:37:04 -0000       1.4
  @@ -287,6 +287,8 @@
   sub dump_pmc {
       my @files = @_;
       my %all;
  +    # help these dumb 'shells' that are no shells
  +    @files = glob $files[0] if $files[0] eq '*.pmc';
       foreach my $file (@files) {
        my ($class, $res) = dump_1_pmc($file);
           $res->{file} = $file;