Skip to content

Instantly share code, notes, and snippets.

/fix_filechars_array.patch

Created August 26, 2015 11:47
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save anonymous/919dd7d05cb8962eac87 to your computer and use it in GitHub Desktop.
Save anonymous/919dd7d05cb8962eac87 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
fix_filechars_array.patch
diff --git a/lib/File/Temp.pm b/lib/File/Temp.pm
index 4cf2396..5a7f6bd 100644
--- a/lib/File/Temp.pm
+++ b/lib/File/Temp.pm
@@ -3,7 +3,7 @@ unit module File::Temp:ver<0.02>;
use File::Directory::Tree;
# Characters used to create temporary file/directory names
-my @filechars = 'a'..'z', 'A'..'Z', 0..9, '_';
+my @filechars = flat 'a'..'z', 'A'..'Z', 0..9, '_';
constant MAX-RETRIES = 10;
sub gen-random($n) {
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment