Author: sparky
Date: Sun Jun 27 04:09:02 2010
New Revision: 11603

Modified:
   toys/rsget.pl/addgetter
Log:
- added Direct to getter dirs


Modified: toys/rsget.pl/addgetter
==============================================================================
--- toys/rsget.pl/addgetter     (original)
+++ toys/rsget.pl/addgetter     Sun Jun 27 04:09:02 2010
@@ -2,7 +2,7 @@
 
 my $fname = shift @ARGV;
 die "$fname exists" if -r $fname;
-$fname =~ m{^(Get|Video|Audio|Image|Link)/([A-Z0-9][a-zA-Z0-9_]*)$} or die 
"invalid";
+$fname =~ m{^(Get|Video|Audio|Image|Link|Direct)/([A-Z0-9][a-zA-Z0-9_]*)$} or 
die "invalid";
 my ( $dir, $name ) = ($1, $2);
 
 open F_IN, '<', "$dir/.template" or die "no template";
_______________________________________________
pld-cvs-commit mailing list
pld-cvs-commit@lists.pld-linux.org
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit

Reply via email to