[SCM] Video extraction utility for YouTube, Google Video and other video sites (Debian packaging) branch, master, updated. upstream/2.1.9-120-g5cdb4a5

[legatvs]

The following commit has been merged in the master branch:
commit 38a98a9735ac675d4755b4446e34a17adccdbbf2
Author: legatvs <legatvs at gmail.com>
Date:   Sat Apr 4 02:00:55 2009 +0300

    Tidy.

diff --git a/clive b/clive
index 9f584d9..72708e1 100755
--- a/clive
+++ b/clive
@@ -153,7 +153,7 @@ GetOptions(
     'emit-xml|E'          => sub { $opts{emitxml}     = 1 },
     'stream-exec=s'       => sub { $opts{streamexec}  = $_[1] },
     'output-video|O=s'    => sub { $opts{outputfname} = $_[1] },
-    'limit-rate=i',       => sub { $opts{limitrate} = $_[1] },
+    'limit-rate=i',       => sub { $opts{limitrate}   = $_[1] },
           ) or exit(1);
 
 if ($opts{help})
@@ -193,7 +193,7 @@ sub init_curl
 }
 
 sub auth_youtube
-{                            # Log into Youtube
+{    # Log into Youtube
     print "[youtube] attempt to login as $opts{ytuser} ..."
       unless $opts{quiet};
 
@@ -560,8 +560,9 @@ sub extract_video
                 }
             }
 
-            $curl->setopt(CURLOPT_MAX_RECV_SPEED_LARGE, $opts{limitrate}*1024)
-                if defined $opts{limitrate};
+            $curl->setopt(CURLOPT_MAX_RECV_SPEED_LARGE,
+                          $opts{limitrate} * 1024)
+              if defined $opts{limitrate};
 
             $rc = $curl->perform;
             close $fh;
@@ -1694,7 +1695,7 @@ sub title_to_filename
 
     my @a = strdomain($entry{page_url});
 
-    $entry{video_id}    =~ s/\-/_/g;
+    $entry{video_id} =~ s/\-/_/g;
 
     my %h = (
              "%t" => $title,

-- 
Video extraction utility for YouTube, Google Video and other video sites (Debian packaging)