Changeset 2141 for trunk/gui/scripts/tool.tcl
- Timestamp:
- Mar 18, 2011 9:01:35 AM (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gui/scripts/tool.tcl
r2135 r2141 29 29 public method abort {} 30 30 public method reset {} 31 public method xml {args}32 31 33 32 protected method _mkdir {dir} … … 344 343 345 344 # ---------------------------------------------------------------------- 346 # USAGE: xml ?<option> <arg> <arg>...?347 #348 # Used to access the XML specification for this tool. With no extra349 # args, it returns the Rappture XML object. Otherwise, it applies350 # the option/args to the object and returns the result. The <option>351 # might be something like "children" or "element" or any other352 # operation supported by a Rappture::library object.353 # ----------------------------------------------------------------------354 itcl::body Rappture::Tool::xml {args} {355 if {[llength $args] == 0} {356 return $_xmlobj357 }358 return [eval $_xmlobj $args]359 }360 361 # ----------------------------------------------------------------------362 345 # USAGE: _output <data> 363 346 #
Note: See TracChangeset
for help on using the changeset viewer.