- Properly instanciate HTMLHelper

diff --git a/videosite/BreakGrabber.pm b/videosite/BreakGrabber.pm
index 2c44d90..0896078 100644 (file)
--- a/videosite/BreakGrabber.pm
+++ b/videosite/BreakGrabber.pm
@@ -33,7 +33,7 @@ sub _parse {
     my $pattern = shift;
     my $content;
     my $metadata = {};
-    my $p = HTMLHelper->new();
+    my $p = videosite::HTMLHelper->new();
     my $n;
 
     $url =~ m|$pattern|;

diff --git a/videosite/BroadcasterGrabber.pm b/videosite/BroadcasterGrabber.pm
index 51f3685..5891acb 100644 (file)
--- a/videosite/BroadcasterGrabber.pm
+++ b/videosite/BroadcasterGrabber.pm
@@ -32,7 +32,7 @@ sub _parse {
     my $pattern = shift;
     my $content;
     my $metadata = {};
-    my $p = HTMLHelper->new();
+    my $p = videosite::HTMLHelper->new();
     my $n;
 
     $url =~ m|$pattern|;

diff --git a/videosite/CollegeHumorGrabber.pm b/videosite/CollegeHumorGrabber.pm
index 192ece5..d747922 100644 (file)
--- a/videosite/CollegeHumorGrabber.pm
+++ b/videosite/CollegeHumorGrabber.pm
@@ -64,7 +64,7 @@ sub _parse {
     # The XML does not contain the full title of the video, for
     # reasons possibly known to some jerk at CollegeHumor.
     # So we'll have to parse the actual HTML, too.
-    $p = HTMLHelper->new();
+    $p = videosite::HTMLHelper->new();
     unless(defined($content = $p->load(sprintf('http://www.collegehumor.com/video:%s', $2)))) {
         $self->error('Could not download HTML');
         return undef;

diff --git a/videosite/SnotrGrabber.pm b/videosite/SnotrGrabber.pm
index 1f56838..5b6ccfb 100644 (file)
--- a/videosite/SnotrGrabber.pm
+++ b/videosite/SnotrGrabber.pm
@@ -32,7 +32,7 @@ sub _parse {
     my $pattern = shift;
     my $content;
     my $metadata = {};
-    my $p = HTMLHelper->new();
+    my $p = videosite::HTMLHelper->new();
     my $n;
 
     $url =~ m|$pattern|;