|
|
|
|
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.18/Makefile.PL
|
|
|
|
|
--- JavaScript-SpiderMonkey-0.18/Makefile.PL.orig 2006-07-28 11:30:08 +0200
|
|
|
|
|
+++ JavaScript-SpiderMonkey-0.18/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.18/SpiderMonkey.pm
|
|
|
|
|
--- JavaScript-SpiderMonkey-0.18/SpiderMonkey.pm.orig 2006-07-28 11:36:39 +0200
|
|
|
|
|
+++ JavaScript-SpiderMonkey-0.18/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;
|
