Author: sparky
Date: Sat Jun 26 17:08:13 2010
New Revision: 11591
Modified:
toys/rsget.pl/RSGet/ListAdder.pm
Log:
- allow ftp:// in uris
Modified: toys/rsget.pl/RSGet/ListAdder.pm
==============================================================================
--- toys/rsget.pl/RSGet/ListAdder.pm (original)
+++ toys/rsget.pl/RSGet/ListAdder.pm Sat Jun 26 17:08:13 2010
@@ -56,7 +56,7 @@
my $u = qr/[a-z0-9_-]+/;
my $tld = qr/[a-z]{2,8}/;
foreach ( split /\s+/s, $text ) {
- next unless m{^(.*?)(https?://)?((?:$u\.)*$u\.$tld/.+)$};
+ next unless
m{^(.*?)(https?://||ftp://)?((?:$u\.)*$u\.$tld/.+)$};
my $pre = $1;
my $proto = $2 || "http://";
my $uri = $proto . $3;
_______________________________________________
pld-cvs-commit mailing list
[email protected]
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit