diff options
author | Hans Hagen <pragma@wxs.nl> | 2011-02-25 22:03:00 +0100 |
---|---|---|
committer | Hans Hagen <pragma@wxs.nl> | 2011-02-25 22:03:00 +0100 |
commit | 3c5dbaefc44f38d6da23a7db2c06a0a4af0996fa (patch) | |
tree | c3ad9361af8d3f1dd37de52463fa505680446a1e /scripts | |
parent | 15ee46403d36de6f29b4e45171e061708ec69193 (diff) | |
download | context-3c5dbaefc44f38d6da23a7db2c06a0a4af0996fa.tar.gz |
beta 2011.02.25 22:03
Diffstat (limited to 'scripts')
-rw-r--r-- | scripts/context/lua/mtxrun.lua | 5 | ||||
-rw-r--r-- | scripts/context/perl/mptopdf.pl | 13 | ||||
-rw-r--r-- | scripts/context/stubs/mswin/mtxrun.lua | 5 | ||||
-rwxr-xr-x | scripts/context/stubs/unix/mtxrun | 5 |
4 files changed, 19 insertions, 9 deletions
diff --git a/scripts/context/lua/mtxrun.lua b/scripts/context/lua/mtxrun.lua index ea70a5cc4..0d9e071fe 100644 --- a/scripts/context/lua/mtxrun.lua +++ b/scripts/context/lua/mtxrun.lua @@ -1282,7 +1282,8 @@ local function serialize(root,name,_handle,_reduce,_noquotes,_hexify) if root then -- The dummy access will initialize a table that has a delayed initialization -- using a metatable. - local dummy = root.whatever + local dummy = root._w_h_a_t_e_v_e_r_ + root._w_h_a_t_e_v_e_r_ = nil -- Let's forget about empty tables. if next(root) then do_serialize(root,name,"",0) @@ -4792,6 +4793,7 @@ function setters.register(t,what,...) end end end + return false -- so we can use it in an assignment end function setters.enable(t,what) @@ -7246,6 +7248,7 @@ if not modules then modules = { } end modules ['lxml-pth'] = { } -- e.ni is only valid after a filter run +-- todo: B/C/[get first match] local concat, remove, insert = table.concat, table.remove, table.insert local type, next, tonumber, tostring, setmetatable, loadstring = type, next, tonumber, tostring, setmetatable, loadstring diff --git a/scripts/context/perl/mptopdf.pl b/scripts/context/perl/mptopdf.pl index 374d8912a..42db9001e 100644 --- a/scripts/context/perl/mptopdf.pl +++ b/scripts/context/perl/mptopdf.pl @@ -27,11 +27,12 @@ use File::Basename ; $Getopt::Long::passthrough = 1 ; # no error message $Getopt::Long::autoabbrev = 1 ; # partial switch accepted -my $Help = 0; -my $Latex = 0; -my $RawMP = 1; +my $Help = 0 ; +my $Latex = 0 ; +my $TeXexec = 0 ; +my $RawMP = 1 ; my $MetaFun = 0 ; -my $PassOn = '' ; +my $PassOn = '' ; &GetOptions ( "help" => \$Help , @@ -47,9 +48,9 @@ my $miktex = 0 ; my $done = 0 ; my $report = '' ; my $mplatexswitch = " --tex=latex " ; -my $texexecswitch = " --tex=\"texexec --batch --once --nomp --mptex\" " # untested +my $texexecswitch = " --tex=\"texexec --batch --once --nomp --mptex\" " ; # untested -my $dosish = ($Config{'osname'} =~/^(ms)?dos|^os\/2|^mswin/i) ; +my $dosish = ($Config{'osname'} =~ /^(ms)?dos|^os\/2|^mswin/i) ; my $escapeshell = (($ENV{'SHELL'}) && ($ENV{'SHELL'} =~ m/sh/i )); if ($ENV{"TEXSYSTEM"}) { diff --git a/scripts/context/stubs/mswin/mtxrun.lua b/scripts/context/stubs/mswin/mtxrun.lua index ea70a5cc4..0d9e071fe 100644 --- a/scripts/context/stubs/mswin/mtxrun.lua +++ b/scripts/context/stubs/mswin/mtxrun.lua @@ -1282,7 +1282,8 @@ local function serialize(root,name,_handle,_reduce,_noquotes,_hexify) if root then -- The dummy access will initialize a table that has a delayed initialization -- using a metatable. - local dummy = root.whatever + local dummy = root._w_h_a_t_e_v_e_r_ + root._w_h_a_t_e_v_e_r_ = nil -- Let's forget about empty tables. if next(root) then do_serialize(root,name,"",0) @@ -4792,6 +4793,7 @@ function setters.register(t,what,...) end end end + return false -- so we can use it in an assignment end function setters.enable(t,what) @@ -7246,6 +7248,7 @@ if not modules then modules = { } end modules ['lxml-pth'] = { } -- e.ni is only valid after a filter run +-- todo: B/C/[get first match] local concat, remove, insert = table.concat, table.remove, table.insert local type, next, tonumber, tostring, setmetatable, loadstring = type, next, tonumber, tostring, setmetatable, loadstring diff --git a/scripts/context/stubs/unix/mtxrun b/scripts/context/stubs/unix/mtxrun index ea70a5cc4..0d9e071fe 100755 --- a/scripts/context/stubs/unix/mtxrun +++ b/scripts/context/stubs/unix/mtxrun @@ -1282,7 +1282,8 @@ local function serialize(root,name,_handle,_reduce,_noquotes,_hexify) if root then -- The dummy access will initialize a table that has a delayed initialization -- using a metatable. - local dummy = root.whatever + local dummy = root._w_h_a_t_e_v_e_r_ + root._w_h_a_t_e_v_e_r_ = nil -- Let's forget about empty tables. if next(root) then do_serialize(root,name,"",0) @@ -4792,6 +4793,7 @@ function setters.register(t,what,...) end end end + return false -- so we can use it in an assignment end function setters.enable(t,what) @@ -7246,6 +7248,7 @@ if not modules then modules = { } end modules ['lxml-pth'] = { } -- e.ni is only valid after a filter run +-- todo: B/C/[get first match] local concat, remove, insert = table.concat, table.remove, table.insert local type, next, tonumber, tostring, setmetatable, loadstring = type, next, tonumber, tostring, setmetatable, loadstring |