Changeset 60dd1b2 in tol

Timestamp:

Feb 1, 2012, 6:00:32 PM (15 years ago)

Author:

Jorge Pérez <josp.jorge@…>

Branches:

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

Children:

2f5c82f1

Parents:

2bb643b

Message:

refs #1409, mostramos como version el valor de Text Version

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

File:

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

tolbase/lib/toltk/tolbase.tcl

@@ -1316 +1316 @@
   array set TolVersionInfo [::tol::info version]
   label $w.lversion -bg black -fg white -text \
-    "[mc {TOL Version}]: $TolVersionInfo(major).$TolVersionInfo(minor).$TolVersionInfo(release) ($TolVersionInfo(comment))"
+      "[mc {TOL Version}]: [ lindex [ toltcl::eval {Text Version} ] 0 ]"
   label $w.laddress -bg black -fg white -text {
     Bayes Forecast: dynamic modelling of operations and markets