~ubuntubudgie-dev/tasksel/ubuntu-budgie-tasksel-proposal.zesty

« back to all changes in this revision

Viewing changes to listpackages.pl

  • Committer: Joey Hess
  • Date: 2004-01-22 02:07:43 UTC
  • Revision ID: git-v1:49bd31b09eab827a557f87eb99afdddd6bbaec4b
various things need to be changes for subversion

Show diffs side-by-side

added added

removed removed

Lines of Context:
24
24
sub processfile {
25
25
        my $file=$_; # File::Find craziness.
26
26
        $file eq 'po' && -d $file && ($File::Find::prune = 1);
 
27
        return if $File::Find::dir=~/\.svn/;
27
28
        return unless $file =~ /^[-+_.a-z0-9]+$/ and -f $file;
28
29
        open (IN, $file) or die "$file: $!";
29
30
        my %fields;