File tree Expand file tree Collapse file tree
kratos.gid/apps/StenosisWizard Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -33,7 +33,7 @@ proc ::StenosisWizard::Init { } {
3333
3434proc ::StenosisWizard::LoadMyFiles { } {
3535 variable dir
36- uplevel #0 [list source [file join $dir xml GetFromXML .tcl]]
36+ uplevel #0 [list source [file join $dir xml XmlController .tcl]]
3737 uplevel #0 [list source [file join $dir write write.tcl]]
3838 smart_wizard::LoadWizardDoc [file join $dir wizard Wizard_default.wiz]
3939 uplevel #0 [list source [file join $dir wizard Wizard_Steps.tcl]]
Original file line number Diff line number Diff line change 1- namespace eval StenosisWizard::xml {
2- variable dir
3- }
4-
5- proc StenosisWizard::xml::Init { } {
6- variable dir
7- Model::InitVariables dir $StenosisWizard::dir
8-
9- spdAux::processIncludes
10- }
11-
12- proc StenosisWizard::xml::CustomTree {args} {
13-
14- spdAux::processIncludes
15- Fluid::xml::CustomTree {*}$args
16- }
17-
18- proc StenosisWizard::xml::getUniqueName {name} {
19- return StenWiz$name
20- }
21-
22- proc ::StenosisWizard::xml::MultiAppEvent {args} {
23- if {$args eq " init" } {
24- spdAux::parseRoutes
25- spdAux::ConvertAllUniqueNames FL StenWiz
26- }
27- }
28-
29- StenosisWizard::xml::Init
1+ namespace eval StenosisWizard::xml {
2+ variable dir
3+ }
4+
5+ proc StenosisWizard::xml::Init { } {
6+ variable dir
7+ Model::InitVariables dir $StenosisWizard::dir
8+
9+ spdAux::processIncludes
10+ }
11+
12+ proc StenosisWizard::xml::CustomTree {args} {
13+
14+ spdAux::processIncludes
15+ Fluid::xml::CustomTree {*}$args
16+ }
17+
18+ proc StenosisWizard::xml::getUniqueName {name} {
19+ return StenWiz$name
20+ }
21+
22+ proc ::StenosisWizard::xml::MultiAppEvent {args} {
23+ if {$args eq " init" } {
24+ spdAux::parseRoutes
25+ spdAux::ConvertAllUniqueNames FL StenWiz
26+ }
27+ }
28+
29+ StenosisWizard::xml::Init
You can’t perform that action at this time.
0 commit comments