SVN: toys/rsget.pl/Link/CryptIt

sparky sparky at pld-linux.org
Mon Jul 12 16:08:10 CEST 2010


Author: sparky
Date: Mon Jul 12 16:08:09 2010
New Revision: 11659

Modified:
   toys/rsget.pl/Link/CryptIt
Log:
- don't throw error if password specified


Modified: toys/rsget.pl/Link/CryptIt
==============================================================================
--- toys/rsget.pl/Link/CryptIt	(original)
+++ toys/rsget.pl/Link/CryptIt	Mon Jul 12 16:08:09 2010
@@ -40,12 +40,12 @@
 		unless $-{_referer} =~ m{^http://crypt-it\.com/(.*?)/(.*?)$};
 	$-{dir} = $2;
 
-	ERROR( "password required" )
-		if />Acces denied! Password required</;
-
 	my $pass = $-{_opts}->{pass} || "";
 	my $post = $post_header . $-{dir} . $post_separator . ( chr length $pass ) . $pass;
 
+	ERROR( "password required" )
+		if />Acces denied! Password required</ and not $pass;
+
 	GET( "http://crypt-it.com/engine/",
 		post => $post,
 		headers => [ "Content-Type: application/x-amf" ],


More information about the pld-cvs-commit mailing list