X-Git-Url: https://git.camperquake.de/gitweb.cgi?a=blobdiff_plain;f=videosite%2FJSArrayParser.pm;h=bbc60de857acc5a2bd39e0184c4bc1f4164e4ad3;hb=b6283fc76d8dedc75b56fa37a3a9254db0c0c1b2;hp=cadf8e8a681efc0c307793f74b16bcb96c87a5fe;hpb=58b8459c57374848e30ec37cf026a8c7680a8a9f;p=videosite.git

diff --git a/videosite/JSArrayParser.pm b/videosite/JSArrayParser.pm
index cadf8e8..bbc60de 100644
--- a/videosite/JSArrayParser.pm
+++ b/videosite/JSArrayParser.pm
@@ -13,6 +13,7 @@ use strict;
 
 sub new {
     my $class = shift;
+    my %params = @_;
     my $self = {};
 
     if ($class ne __PACKAGE__) {
@@ -21,29 +22,9 @@ sub new {
     }
 
     # Try to find a child object which is available and return that.
-    #
-    # See if videosite::JSLexArrayParser is available
-    eval {
-        require videosite::JSLexArrayParser;
-    };
-
-    unless($@) {
-        # Available. Return a JSLexArrayParser object
-        return videosite::JSLexArrayParser->new();
-    }
-
-    # See if JSSimleArrayParser is available
-    eval {
-        require videosite::JSSimpleArrayParser;
-    };
-
-    unless ($@) {
-        # Available. Return a JSSimpleArrayParser object
-        return videosite::JSSimpleArrayParser->new();
-    }
 
-    # Nothing available. Return ourselves.
-    return bless($self, $class);
+    require videosite::JSJSONArrayParser;
+    return videosite::JSJSONArrayParser->new(%params);
 }
 
 sub parse {