files.pl: allow dash

brendangregg · Feb 5, 2017 · 640143c · 640143c
1 parent a30ac04
commit 640143c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/files.pl b/files.pl
@@ -34,7 +34,7 @@ sub wanted {
 	my ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size) = stat($_);
 	my $path = $File::Find::name;
 	$path =~ tr/\//;/;		# delimiter
-	$path =~ tr/;.a-zA-Z0-9/_/c;	# ditch whitespace and other chars
+	$path =~ tr/;.a-zA-Z0-9-/_/c;	# ditch whitespace and other chars
 	$path =~ s/^;//;
 	print "$path $size\n";
 }