You can now specify multiple parameters when annotating script context object paths
r2925 | ffr | 2010-05-18 15:11:27 +1000 (Tue, 18 May 2010) | 2 lines
This commit is contained in:
committed by
Douglas Clowes
parent
8b1e84eac6
commit
eb7e4877cc
@@ -39,12 +39,16 @@ proc ::scobj::hinit_scobjprops {scobj hpath} {
|
||||
# saving data for script context objects
|
||||
# @param scobj, name of script context object
|
||||
# @param par, optional parameter
|
||||
proc ::scobj::hinitprops {scobj {par "@none"}} {
|
||||
if {$par == "@none"} {
|
||||
proc ::scobj::hinitprops {scobj args} {
|
||||
if {$args == ""} {
|
||||
set hpath /sics/$scobj
|
||||
::scobj::hinit_scobjprops $scobj $hpath
|
||||
} else {
|
||||
set hpath /sics/$scobj/$par
|
||||
::scobj::hinit_nodeprops ${scobj}_$par $hpath
|
||||
set hpath /sics/$scobj
|
||||
::scobj::hinit_scobjprops $scobj $hpath
|
||||
foreach p $args {
|
||||
set hpath /sics/$scobj/$p
|
||||
::scobj::hinit_nodeprops ${scobj}_$p $hpath
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user