From 50fad7014b226e396b49e8a254dcdd26d856c8aa Mon Sep 17 00:00:00 2001
From: Joe Taylor <k1jt@arrl.org>
Date: Wed, 23 Jul 2008 21:02:32 +0000
Subject: [PATCH] Satisfy g95 compiler.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/map65@990 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
---
 map65.py    | 2 +-
 recvpkt.F90 | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/map65.py b/map65.py
index 984402367..9dc66e54a 100644
--- a/map65.py
+++ b/map65.py
@@ -1,4 +1,4 @@
-#-------------------------------------------------------------------- MAP65
+#--------------------------------------------------------------------- MAP65
 # $Date$ $Revision$
 #
 from Tkinter import *
diff --git a/recvpkt.F90 b/recvpkt.F90
index 3ee245a8a..78df30d3d 100644
--- a/recvpkt.F90
+++ b/recvpkt.F90
@@ -82,7 +82,7 @@ subroutine recvpkt(iarg)
   endif
   nblock0=nblock
 
-  if(mod(nsec,60).eq.1 .or. transmitting) nreset=1
+  if(mod(nsec,60).eq.1 .or. transmitting.eq.1) nreset=1
   tdiff=mod(0.001d0*msec,60.d0)-mod(Tsec,60.d0)
   if(tdiff.lt.-30.) tdiff=tdiff+60.
   if(tdiff.gt.30.) tdiff=tdiff-60.