Subversion Repositories svn.Prod repos

Compare Revisions

Ignore whitespace Rev 36 → Rev 37

/filefind/perl/filefind.pl
28,7 → 28,7
my ($progname, $mesg) = @_;
 
print "Usage : $progname directory\n";
print "Usage: $progname directory\n";
print "$mesg\n"
}
 
93,7 → 93,7
}
else
{
Usage ($progname, "ERROR: No directory $directory found");
Usage ($progname, "ERROR: Not a directory : $directory");
}
}
else