diff options
Diffstat (limited to 'ds9/library/ds9.tcl')
| -rwxr-xr-x | ds9/library/ds9.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ds9/library/ds9.tcl b/ds9/library/ds9.tcl index 645b94b..be35cd1 100755 --- a/ds9/library/ds9.tcl +++ b/ds9/library/ds9.tcl @@ -438,8 +438,8 @@ switch $ds9(wm) { # We want to withdraw the window til everything is ready to go wm withdraw $ds9(top) -wm title $ds9(top) "SAOImage $ds9(title)" -wm iconname $ds9(top) "SAOImage $ds9(title)" +wm title $ds9(top) "SAOImage[string toupper $ds9(title)]" +wm iconname $ds9(top) "SAOImage[string toupper $ds9(title)]" wm protocol $ds9(top) WM_DELETE_WINDOW QuitDS9 # we need to set certain variables before anything else |