Changeset 3799 for trunk/gui/scripts/energyLevels.tcl
- Timestamp:
- Jul 15, 2013, 9:25:29 AM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gui/scripts/energyLevels.tcl
r3330 r3799 274 274 -param "" 275 275 } 276 foreach {opt val} $settings { 277 if {![info exists params($opt)]} { 278 error "bad setting \"$opt\": should be [join [lsort [array names params]] {, }]" 279 } 280 set params($opt) $val 281 } 276 array set params $settings 282 277 283 278 # convert -linestyle to BLT -dashes
Note: See TracChangeset
for help on using the changeset viewer.