From 082d020e6964f4b822d287980740bc3d787f3685 Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Fri, 20 Jan 2006 23:00:53 +0000
Subject: [PATCH] get the xml checking correct!

---
 perl/DXXml.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/perl/DXXml.pm b/perl/DXXml.pm
index 00fccde4..c40e3be0 100644
--- a/perl/DXXml.pm
+++ b/perl/DXXml.pm
@@ -99,11 +99,11 @@ sub normal
 		dbg("Invalid, non-existant or zero time") if isdbg('chanerr');
 		return;
 	}
-	unless ($t < $main::systime - $max_old_age || $t > $main::systime + $max_future_age) {
+	unless ($t > $main::systime - $max_old_age && $t < $main::systime + $max_future_age) {
 		dbg("Too old or too far in the future") if isdbg('chanerr');
 		return;
 	}
-	unless (exists $xref->{id} && ($id = $xref->{id}) >= 0 && $id <= 9999) {
+	unless (exists $xref->{id} && ($id = $xref->{id}) >= 0 && $id <= 999) {
 		dbg("Invalid or non-existant id") if isdbg('chanerr');
 		return;
 	}
-- 
2.34.1