Commit 1697a81b authored by Richard Levitte's avatar Richard Levitte
Browse files

Allow spaces in filenames when using perl's glob

parent c6cb8e3c
Loading
Loading
Loading
Loading
+1 −1
Original line number Diff line number Diff line
@@ -18,7 +18,7 @@ my @filelist;

foreach my $arg (@ARGV) {
	$arg =~ s|\\|/|g;	# compensate for bug/feature in cygwin glob...
	foreach (glob $arg)
	foreach (glob qq("$arg"))
		{
		push @filelist, $_;
		}
+1 −1
Original line number Diff line number Diff line
@@ -26,7 +26,7 @@ foreach $arg (@ARGV) {
		next;
		}
	$arg =~ s|\\|/|g;	# compensate for bug/feature in cygwin glob...
	foreach (glob $arg)
	foreach (glob qq("$arg"))
		{
		push @filelist, $_;
		}