Changeset 2840b37 in tol for tolbase

Timestamp:

Aug 26, 2010, 1:33:24 PM (16 years ago)

Author:

Jorge Pérez <josp.jorge@…>

Branches:

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

Children:

e462ba2

Parents:

63399bd

Message:

closes #967, por el momento deshabilitamos estos mensajes, si en algún momento hay que avisar de algún error de conversión no debe darse este celda a celda sino al final de la creación de toda la tabla.

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

File:

• tolbase/lib/byswidget/btable/btable.tcl (modified) (2 diffs)

tolbase/lib/byswidget/btable/btable.tcl

@@ -1497 +1497 @@
     } else {
       $self setType $col text
-      set rq [tk_messageBox -type "ok" -icon warning \
-       -title [mc "Warning"] -parent $widget(tab)\
-       -message "[mc SomeCellNotReal].\n\
+      if { 0 } {
+        set rq [tk_messageBox -type "ok" -icon warning \
+                    -title [mc "Warning"] -parent $widget(tab)\
+                    -message "[mc SomeCellNotReal].\n\
        [mc TypeSetText]"]
+      }
       return $matrix($cell)
     }
@@ -1544 +1546 @@
     } else {
       $self setType $col text
+      if { 0 } {
       set rq [tk_messageBox -type "ok" -icon warning \
        -title [mc "Warning"] -parent $self\
        -message "[mc SomeCellNotDate].\n\
        [mc TypeSetText]"]
+      }
       return $matrix($cell)
     }