blob: 63c6e42f51b705f156099275eaefa8c04f0a9d01 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
$NetBSD: patch-ar,v 1.1 2000/12/16 05:44:09 hubertf Exp $
--- sdr/src/plugins.tcl.orig Thu Jul 15 15:55:13 1999
+++ sdr/src/plugins.tcl Wed Dec 13 02:17:26 2000
@@ -84,6 +84,7 @@
}
set tag [string trim [lindex [split $line ":"] 0]]
set value [string trim [join [lrange [split $line ":"] 1 end] ":"]]
+ set value [string map { \$ \\\$ } $value ]
switch $tag {
"@define" {
|