Changeset b47c991 in tol for tolbase/lib/toltk/init_toltk.tcl

Timestamp:

Jun 20, 2011, 1:13:12 PM (15 years ago)

Author:

Jorge Pérez <josp.jorge@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

b50906a

Parents:

f5c1a77

Message:

refs #1259, implementamos el argumento '-np' en tol::initlibrary, interpretamos la opcion -np en tolsh y tolbase

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@3655 be4846ae-f051-483a-831f-b64e7d08527f

File:

• tolbase/lib/toltk/init_toltk.tcl (modified) (1 diff)

tolbase/lib/toltk/init_toltk.tcl

@@ -291 +291 @@
 # Load project
 namespace import project::*
+set project::data(iniproject) 1
 foreach option $argv {
   if { [string equal $option "-b"] } {
     set project::data(oculto) 1
+  } elseif { $option eq "-np" } {
+    set project::data(iniproject) 0
   }
 }