Changeset 76e5375 in tol


Ignore:
Timestamp:
Apr 12, 2012, 8:01:12 AM (15 years ago)
Author:
Jorge Pérez <josp.jorge@…>
Branches:
1941-docker-image-to-test, devel, master
Children:
0d8e27b
Parents:
5ee15b9
Message:

refs #939, estaba mal tipado un If

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

File:
1 edited

Legend:

Unmodified
Added
Removed

  • tol/stdlib/system/_geturl.tol

    r5ee15b9 r76e5375  
    206206      Real ok = If(check==0, 1,
    207207      {
    208         Text If(!cannot_connect,
     208        Set If(!cannot_connect,
    209209          Set Tcl_EvalEx( [[ "tk_messageBox",
    210210                             "-title", "Check TOL Release",
Note: See TracChangeset for help on using the changeset viewer.