General: Expand JSLexArrayParser to recognize [, ] and # in strings, and add debugging
[videosite.git] / videosite / JSArrayParser.pm
index cadf8e8..8f9b729 100644 (file)
@@ -13,6 +13,7 @@ use strict;
 
 sub new {
     my $class = shift;
+    my %params = @_;
     my $self = {};
 
     if ($class ne __PACKAGE__) {
@@ -29,7 +30,7 @@ sub new {
 
     unless($@) {
         # Available. Return a JSLexArrayParser object
-        return videosite::JSLexArrayParser->new();
+        return videosite::JSLexArrayParser->new(%params);
     }
 
     # See if JSSimleArrayParser is available
@@ -39,7 +40,7 @@ sub new {
 
     unless ($@) {
         # Available. Return a JSSimpleArrayParser object
-        return videosite::JSSimpleArrayParser->new();
+        return videosite::JSSimpleArrayParser->new(%params);
     }
 
     # Nothing available. Return ourselves.