(Boeing r1753)
properly support session options having spaces in value
This commit is contained in:
parent
f8f46d28be
commit
1116ff83b5
2 changed files with 3 additions and 3 deletions
|
@ -1471,12 +1471,12 @@ proc resetSessionOptions {} {
|
|||
proc setSessionOptions { types vals } {
|
||||
global g_session_options
|
||||
foreach kv $vals {
|
||||
set kvs [split $kv =]
|
||||
set kvs [splitKeyValue $kv]
|
||||
if {[llength $kvs] < 2} {
|
||||
puts "error with session option: $kv"
|
||||
continue
|
||||
}
|
||||
set key [lindex $kvs 0]
|
||||
set key [string trim [lindex $kvs 0]]
|
||||
set value [lindex $kvs 1]
|
||||
array set g_session_options [list $key $value]
|
||||
}
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue