aboutsummaryrefslogtreecommitdiff
path: root/Pointcurs.f
diff options
context:
space:
mode:
Diffstat (limited to 'Pointcurs.f')
-rwxr-xr-xPointcurs.f4
1 files changed, 2 insertions, 2 deletions
diff --git a/Pointcurs.f b/Pointcurs.f
index d4bb692..fa46709 100755
--- a/Pointcurs.f
+++ b/Pointcurs.f
@@ -9,9 +9,9 @@ c******************************************************************************
call sm_graphics
- if (whichwin .eq. '1of1') then
+ if (whichwin == '1of1') then
call sm_window (1,1,1,1,1,1)
- elseif (whichwin .eq. '2of2') then
+ elseif (whichwin == '2of2') then
call sm_defvar ('y_gutter','0.0')
call sm_window (1,2,1,1,1,1)
endif