Overview  Namespace   Class 
SUMMARY: CHILDREN | PARAMETER | INSTPROC | INSTFILTER | INSTFORWARD DETAIL: | INSTPROC

::xox
Class Environment

Heritage:
::xotcl::Object
  |
  +--::xox::Node
Associated Test:
::xox::test::TestEnvironment
Class Environment
superclass ::xox::Node,
Please describe the class Environment here.
Variables
NameDefault ValueClassComment
nodeName    ::xox::Node 
 
tclLibPath    ::xox::Environment 
 
 
Methods
NameComment
addTclLibPath {path}  
loadEnvironment {file}  
loadPaths {}  
writeEnvironment {file}  
   
Methods from ::xotcl::Object
#, ., ?, ?code, ?methods, ?object, abstract, copy, coverageFilter, defaultmethod, extractConfigureArg, filterappend, garbageCollect, get#, getClean#, hasclass, init, methodTag, mixinappend, move, profileFilter, self, setParameterDefaults, shell, tclcmd, traceFilter,
 
Instproc Detail

addTclLibPath

Description:
Arguments:
Code: 
  ::xox::Environment instproc addTclLibPath {path}  {
   

        lappend ::env(TCLLIBPATH) $path
        lappend ::auto_path $path
    
}

loadEnvironment

Description:
Arguments:
Code: 
  ::xox::Environment instproc loadEnvironment {file}  {
   

        set reader [ ::xox::XmlNodeReader new ]

        $reader buildNodes [ self ] $xml

        my loadPaths
    
}

loadPaths

Description:
Code: 
  ::xox::Environment instproc loadPaths {}  {
   

        foreach path [ my tclLibPath ] {

            my addTclLibPath $path
        }
    
}

writeEnvironment

Description:
Arguments:
Code: 
  ::xox::Environment instproc writeEnvironment {file}  {
   

        set writer [ ::xox::SimpleXmlNodeWriter new ]

        $writer writeXmlFile [ self ] $file
    
}