openpkg-packages/js/js.patch

Index: JavaScript-1.03/Makefile.PL
--- JavaScript-1.03/Makefile.PL.orig	2007-02-21 16:57:19 +0100
+++ JavaScript-1.03/Makefile.PL	2007-02-24 17:10:08 +0100
@@ -94,7 +94,7 @@
     push @defines, "JS_THREADSAFE" if $ENV{JS_THREADSAFE};
 }
 else {
-    my $enable_threadsafe = prompt("Is your SpiderMonkey compiled with JS_THREADSAFE (most things will fail if you answer wrong)? [y/N]");
+    my $enable_threadsafe = 'n';
     push @defines, "JS_THREADSAFE" if $enable_threadsafe eq 'y';
 }
 
@@ -103,7 +103,7 @@
     push @defines, "JS_C_STRINGS_ARE_UTF8" if $ENV{JS_UTF8};
 }
 else {
-    my $enable_utf8 = prompt("Is your SpiderMonkey compiled with support for unicode (t/23-unicode.t will fail if you answer wrong) ? [y/N]", "N");
+	my $enable_utf8 = 'n';
     push @defines, "JS_C_STRINGS_ARE_UTF8" if $enable_utf8 eq 'y';
 }
 
Index: JavaScript-SpiderMonkey-0.17/Makefile.PL
--- JavaScript-SpiderMonkey-0.17/Makefile.PL.orig	2006-07-28 11:30:08 +0200
+++ JavaScript-SpiderMonkey-0.17/Makefile.PL	2007-02-24 17:09:41 +0100
@@ -30,6 +30,7 @@
 );
 
 my %possible_install_paths = (
+  "../js/.libs"      => "../js/src",
   "../js/src/*"      => "../js/src",
   "/usr/lib"         => "/usr/include",
   "/usr/local/lib"   => "/usr/local/include",
@@ -120,7 +121,6 @@
     'NAME'		=> 'JavaScript::SpiderMonkey',
     'VERSION_FROM'	=> 'SpiderMonkey.pm', # finds $VERSION
     'PREREQ_PM'		=> {
-        'Log::Log4perl' => 0,
         'Data::Dumper'  => 0,
                            }, # e.g., Module::Name => 1.1
     ($] >= 5.005 ?    ## Add these new keywords supported since 5.005
Index: JavaScript-SpiderMonkey-0.17/SpiderMonkey.pm
--- JavaScript-SpiderMonkey-0.17/SpiderMonkey.pm.orig	2006-07-28 11:36:39 +0200
+++ JavaScript-SpiderMonkey-0.17/SpiderMonkey.pm	2007-02-24 17:09:41 +0100
@@ -75,7 +75,6 @@
 use strict;
 use warnings;
 use Data::Dumper;
-use Log::Log4perl qw(:easy);
 
 require Exporter;
 require DynaLoader;
@@ -557,14 +556,7 @@
 ##################################################
 sub debug_enabled {
 ##################################################
-    my $logger = Log::Log4perl::get_logger("JavaScript::SpiderMonkey");
-    if(Log::Log4perl->initialized() and $logger->is_debug()) {
-        # print "DEBUG IS ENABLED\n";
-        return 1;
-    } else {
-        # print "DEBUG IS DISABLED\n";
-        return 0;
-    }
+    return 0;
 }
 
 1;