Changeset 382


Ignore:
Timestamp:
Dec 4, 2009 5:05:14 PM (11 years ago)
Author:
toby
Message:

# on 2001/04/17 22:45:54, toby did:
use same spelling for geometry program on all platforms

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/gsasmenu.tcl

    • Property rcs:date changed from 2000/12/22 19:44:07 to 2001/04/17 22:45:54
    • Property rcs:lines changed from +3 -3 to +2 -19
    • Property rcs:rev changed from 1.16 to 1.17
    r361 r382  
    372372        liveplot
    373373}       
    374 
    375 
    376 # convert geometry to geomtry for Windows
    377 if {$tcl_platform(platform) == "windows"} {
    378     foreach name [array names expgui_menulist] {
    379         while {[set pos [lsearch $expgui_menulist($name) geometry]] != -1} {
    380             set expgui_menulist($name) \
    381                     [lreplace $expgui_menulist($name) $pos $pos geomtry]
    382         }
    383     }
    384     while {[set pos [lsearch $expgui(buttonlist) geometry]] != -1} {
    385         set expgui_menulist($name) \
    386                 [lreplace $expgui(buttonlist) $pos $pos geomtry]
    387     }
    388     set expgui_cmdlist(geomtry) $expgui_cmdlist(geometry)
    389     unset expgui_cmdlist(geometry)
    390 }
Note: See TracChangeset for help on using the changeset viewer.