YouTube: Add comment to format list

[videosite.git] / videosite / RedTubeGrabber.pm

diff --git a/videosite/RedTubeGrabber.pm b/videosite/RedTubeGrabber.pm
index a67a755..d461c45 100644 (file)
--- a/videosite/RedTubeGrabber.pm
+++ b/videosite/RedTubeGrabber.pm
@@ -6,10 +6,10 @@
 # Algorithm for the file name hash reverse engineered by
 # Maximilian Rehkopf  <otakon at gmx dot net>
 
-package RedTubeGrabber;
+package videosite::RedTubeGrabber;
 
-use GrabberBase;
-@ISA = qw(GrabberBase);
+use videosite::GrabberBase;
+@ISA = qw(videosite::GrabberBase);
 
 use LWP::UserAgent;
 use HTTP::Cookies;
@@ -31,17 +31,6 @@ sub new {
     return $self;
 }
 
-sub check_cookie {
-
-    my $jar = shift;
-    my $key = shift;
-    my $found = undef;
-
-    $jar->scan(sub { $found = 1 if ( $key eq $_[1]) });
-
-    return $found;
-}
-
 sub div($$) {
     return ($_[0] - ($_[0] % $_[1])) / $_[1];
 }