SVN: toys/rsget.pl/Video/Banzaj

[sparky]

Author: sparky
Date: Wed Dec 16 02:23:21 2009
New Revision: 11047

Modified:
   toys/rsget.pl/Video/Banzaj
Log:
- prevent unify from removing trailing slash
- some "file not found" detection


Modified: toys/rsget.pl/Video/Banzaj
==============================================================================
--- toys/rsget.pl/Video/Banzaj	(original)
+++ toys/rsget.pl/Video/Banzaj	Wed Dec 16 02:23:21 2009
@@ -8,13 +8,19 @@
 name: Banzaj
 short: V:Banzaj
 web: "http://www.video.banzaj.pl/"
-uri: qr{video\.banzaj\.pl/film/\d+/}
+uri: qr{video\.banzaj\.pl/film/\d+/\S+/}
 slots: max
-status: OK 2009-10-04
+status: OK 2009-12-16
+
+unify:
+	s/#.*//;
 
 start:
 	GET( $-{_uri} );
 
+	ERROR( "file not found" ) if
+		m{: Nie znaleziono video} or m{^\s*404\s*$}s;
+
 	! m{<title>(.*?)</title>};
 	my $fname = de_ml( $1 );
 	$fname =~ s{/}{_}g;