diff options
| -rw-r--r-- | mbone/sdr/files/patch-ac | 11 | ||||
| -rw-r--r-- | net/sdr/files/patch-ac | 11 |
2 files changed, 22 insertions, 0 deletions
diff --git a/mbone/sdr/files/patch-ac b/mbone/sdr/files/patch-ac new file mode 100644 index 000000000000..8499cceb284b --- /dev/null +++ b/mbone/sdr/files/patch-ac @@ -0,0 +1,11 @@ +--- ../src/plugin2tcl.tcl.orig Sun Mar 19 20:33:42 2000 ++++ ../src/plugin2tcl.tcl Sun Mar 19 20:35:39 2000 +@@ -8,7 +8,7 @@ + puts $file "set createrules \"$createrules\"" + foreach ary {tooldata mediadata fmts protos protonames fmtnames mappings attrs attrnames attrvaluenames attrflags noattrflags noattrlist defattrlist withattrs macros macrokeys fmtlayers} { + foreach key [array names $ary] { +- puts $file "set [set ary]($key) \"[set [set ary]($key)]\"" ++ puts $file [list set [set ary]($key) [set [set ary]($key)]] + } + } + close $file diff --git a/net/sdr/files/patch-ac b/net/sdr/files/patch-ac new file mode 100644 index 000000000000..8499cceb284b --- /dev/null +++ b/net/sdr/files/patch-ac @@ -0,0 +1,11 @@ +--- ../src/plugin2tcl.tcl.orig Sun Mar 19 20:33:42 2000 ++++ ../src/plugin2tcl.tcl Sun Mar 19 20:35:39 2000 +@@ -8,7 +8,7 @@ + puts $file "set createrules \"$createrules\"" + foreach ary {tooldata mediadata fmts protos protonames fmtnames mappings attrs attrnames attrvaluenames attrflags noattrflags noattrlist defattrlist withattrs macros macrokeys fmtlayers} { + foreach key [array names $ary] { +- puts $file "set [set ary]($key) \"[set [set ary]($key)]\"" ++ puts $file [list set [set ary]($key) [set [set ary]($key)]] + } + } + close $file |