SVN: toys/fun/rsget.pl

[sparky]

Author: sparky
Date: Mon Jun  8 04:48:56 2009
New Revision: 10384

Modified:
   toys/fun/rsget.pl
Log:
- add megaporn.com as an alias to megaupload.com (can't download
  from both at once)


Modified: toys/fun/rsget.pl
==============================================================================
--- toys/fun/rsget.pl	(original)
+++ toys/fun/rsget.pl	Mon Jun  8 04:48:56 2009
@@ -12,6 +12,7 @@
   (catch non-existing files quickly)
 - restart download if same URI has been added second time
 - OdSiebie: there is a captcha now
+- MegaUpload: support password-protected downloads
 
 =item Status:
 - RS: 2009-06-07 OK
@@ -1076,7 +1077,7 @@
 	my $url = shift;
 
 	++$mucookie;
-	my $cookie = ".cookie.mu.$nlcookie.txt";
+	my $cookie = ".cookie.mu.$mucookie.txt";
 	unlink $cookie if -e $cookie;
 
 	Get::makenew( "MU", $class, $url, cookies => $cookie );
@@ -1174,7 +1175,7 @@
 }
 
 $getters{MU} = {
-	uri => qr{(?:www\.)?megaupload\.com/\?d=.*?},
+	uri => qr{(?:www\.)?mega(upload|porn)\.com/\?d=.*?},
 	add => sub { Get::MegaUpload->new( @_ ) },
 };