SVN: toys/rsget.pl/Video/Delfi

[pawelz]

Author: pawelz
Date: Sun Aug  1 21:05:33 2010
New Revision: 11743

Modified:
   toys/rsget.pl/Video/Delfi
Log:
- added support for http://video.delfi.ee/


Modified: toys/rsget.pl/Video/Delfi
==============================================================================
--- toys/rsget.pl/Video/Delfi	(original)
+++ toys/rsget.pl/Video/Delfi	Sun Aug  1 21:05:33 2010
@@ -8,14 +8,14 @@
 name: Delfi
 short: V:Delfi
 web: "http://tv.delfi.ee/"
-uri: qr{tv\.delfi\.ee/video/[a-zA-Z0-9]+}
+uri: qr{(tv|video)\.delfi\.ee/video/[a-zA-Z0-9]+}
 slots: max
 status: OK 2010-07-13
 
 start:
 	GET( $-{_uri} );
 
-	! m{<title>DELFI TV &#62; Video &#62; (.*?)</title>};
+	! m{<title>(?:DELFI TV &#62; Video &#62; )?(.*?)</title>};
 	my $fname = de_ml( $1 );
 	$fname =~ s{/}{_}g;
 	$fname .= ".flv";