Author: sparky Date: Sat Jul 3 02:49:49 2010 New Revision: 11627 Modified: toys/rsget.pl/Video/XVideos Log: - file not found detection - added unify
Modified: toys/rsget.pl/Video/XVideos ============================================================================== --- toys/rsget.pl/Video/XVideos (original) +++ toys/rsget.pl/Video/XVideos Sat Jul 3 02:49:49 2010 @@ -8,13 +8,19 @@ name: XVideos short: V:XVideos web: "http://xvideos.com/"; -uri: qr{xvideos\.com/video\d+/} +uri: qr{xvideos\.com/video\d+} slots: max status: OK 2010-07-03 +unify: + return "http://www.xvideos.com/video$1/"; + if m{xvideos\.com/video(\d+)}; + start: GET( $-{_uri} ); + ERROR( "file not found" ) if m{<h2>Page not found</h2>}; + ! m{<meta name=description content="XVIDEOS (.*?)">}; my $fname = de_ml( $1 ); $fname =~ s{/}{_}g; _______________________________________________ pld-cvs-commit mailing list [email protected] http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit
