From dd6f2237fd4d45b8e6686cb4a9cfe57e30c8377c Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Thu, 16 Aug 2001 21:56:14 +0000
Subject: [PATCH] now get it right!

---
 perl/DXCommandmode.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm
index 8dcb9b6c..6258acb4 100644
--- a/perl/DXCommandmode.pm
+++ b/perl/DXCommandmode.pm
@@ -128,7 +128,7 @@ sub start
 	# do we need to send a forward/opernam?
 	my $lastoper = $user->lastoper || 0;
 	my $homenode = $user->homenode || ""; 
-	if ($homenode eq $main::mycall && $lastoper < $main::systime + $DXUser::lastoperinterval) {
+	if ($homenode eq $main::mycall && $lastoper + $DXUser::lastoperinterval < $main::systime) {
 		run_cmd($DXProt::me, "forward/opernam $call");
 		$user->lastoper($main::systime);
 	}
-- 
2.34.1