diff options
-rw-r--r-- | properties.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/properties.tcl b/properties.tcl index addb624..d225d74 100644 --- a/properties.tcl +++ b/properties.tcl @@ -415,7 +415,7 @@ proc propertiespanel_apply {w} { lappend newconf $key $v } set newconf [string map {$ \\$} $newconf] - pd [concat $::id($w) config {*}$newconf \;] + pd [linsert $newconf 0 $::id($w) config]\; } proc propertiespanel_close {w} { |