---- clive-2.1.5/clive~ 2009-02-10 11:09:45.000000000 +0100
-+++ clive-2.1.5/clive 2009-02-10 11:13:10.000000000 +0100
+--- clive-2.1.9/clive~ 2009-03-30 12:13:37.000000000 +0200
++++ clive-2.1.9/clive 2009-03-30 12:15:01.000000000 +0200
@@ -86,6 +86,7 @@
- IsLiveleak => qr|liveleak.com|i,
- IsEvisor => qr|evisor.tv|i,
- IsDelfi => qr|.delfi.|i,
-+ IsReporter => qr|www.reporter.ee|i,
- );
+ IsEvisor => qr|evisor.tv|i,
+ IsDmotion => qr|dailymotion.com|i,
+ IsDelfi => qr|.delfi.|i,
++ IsReporter => qr|www.reporter.ee|i,
+ );
# Parse config
-@@ -306,6 +307,8 @@
- ($xurl, $id) = handle_liveleak($response_ref, $response_fh);
+@@ -328,6 +328,8 @@
+ ($xurl, $id) = handle_dmotion($response_ref);
} elsif ( $url =~ /$re_hosts{IsDelfi}/ ) {
- ($xurl, $id) = handle_delfi($response_ref, $response_fh);
+ ($xurl, $id) = handle_delfi($response_ref, $response_fh);
+ } elsif ( $url =~ /$re_hosts{IsReporter}/ ) {
-+ ($xurl, $id) = handle_reporter($response_ref, $response_fh);
++ ($xurl, $id) = handle_reporter($response_ref, $response_fh);
}
- # elsif ( $url =~ /$re_hosts{IsMetacafe}/ ) {
- # ($xurl, $id) = handle_metacafe($response_ref);
+ return -1
+ if !$xurl or !$id or !$title;
@@ -369,6 +372,14 @@
$content_ok = 1;
}
}
$errmsg = "expected different content-type, "
. "received \"$content_type\"" unless $content_ok;
-@@ -773,6 +784,27 @@
+@@ -1061,6 +1062,28 @@
return ($xurl, $id);
}
+
+ return ($xurl, $id);
+}
-
++
# Subroutines: Progress
# NOTE: the 'dot' progress copies much from wget.
+