diff --git a/net/nocol/Makefile b/net/nocol/Makefile
index 461d5a563bf9..1f56d08e44af 100644
--- a/net/nocol/Makefile
+++ b/net/nocol/Makefile
@@ -1,8 +1,8 @@
-# $NetBSD: Makefile,v 1.15 2002/05/14 08:38:23 abs Exp $
+# $NetBSD: Makefile,v 1.16 2002/08/08 17:48:59 wiz Exp $
 #
 
 DISTNAME=		nocol-4.3.1
-PKGREVISION=		2
+PKGREVISION=		3
 CATEGORIES=		net
 MASTER_SITES= 		http://www.netplex-tech.com/software/nocol/downloads/
 
diff --git a/net/nocol/distinfo b/net/nocol/distinfo
index 2c14729debac..11c66fe59936 100644
--- a/net/nocol/distinfo
+++ b/net/nocol/distinfo
@@ -1,4 +1,4 @@
-$NetBSD: distinfo,v 1.5 2002/06/28 08:42:34 agc Exp $
+$NetBSD: distinfo,v 1.6 2002/08/08 17:48:59 wiz Exp $
 
 SHA1 (nocol-4.3.1.tar.gz) = a8cb88727bc3a3ddd544792407d431b3ef13a325
 Size (nocol-4.3.1.tar.gz) = 1117438 bytes
@@ -13,3 +13,4 @@ SHA1 (patch-ah) = 14091c7a6c8de7dd451e4292f2d0121ab3643158
 SHA1 (patch-ai) = d8317fad7c5e4574fa980859762f5acb1a7c631d
 SHA1 (patch-aj) = 0eb201f47864132b04702fab4d03e452c07c2e2a
 SHA1 (patch-ak) = 8013fbe6dbff80749dbdc0d0fad391741e48a468
+SHA1 (patch-al) = aa4fa83d53c72e17ea9ffe2685f326ebbbde9132
diff --git a/net/nocol/patches/patch-al b/net/nocol/patches/patch-al
new file mode 100644
index 000000000000..1faab963aad9
--- /dev/null
+++ b/net/nocol/patches/patch-al
@@ -0,0 +1,39 @@
+$NetBSD: patch-al,v 1.1 2002/08/08 17:49:00 wiz Exp $
+
+--- portmon/portmon.c.orig	Thu Apr  6 21:32:26 2000
++++ portmon/portmon.c
+@@ -180,7 +180,7 @@ main(ac, av)
+ 	else
+ 	{
+ 	  update_event(&v, harray[i]->status,
+-		       /* value */ (u_long)(harray[i]->status),
++		       /* value */ (u_long)(harray[i]->elapsedsecs),
+ 		       harray[i]->testseverity) ;
+ 	  lseek(fdout, -(off_t)sizeof(v), SEEK_CUR);
+ 	  write(fdout, (char *)&v, sizeof(v));
+@@ -658,16 +658,21 @@ static char *Strcasestr(haystack, needle
+     s1 = haystack; s2 = needle; n = needlelen;
+     do
+     {
+-      if (tolower(*s1) != tolower(*s2++)  || *s1 == 0)	/* */
++      if (*s1 == 0 || tolower(*s1) != tolower(*s2++))	/* */
+ 	break;
+       ++s1;
+     } while (--n != 0);
+ 
+-    if (n == 0 || *s1 == 0)
+-      break;	/* found, break out of forever loop */
++    if (n == 0) {
++	--haystack;
++	break;		/* found, break out of forever loop */
++    }
++    if (*s1 == 0) {
++	haystack = NULL;
++	break;		/* not found, break out of forever loop */
++    }
+ 
+   }	/* end for */
+-  haystack--;
+   return ((char *)haystack);
+ }	/* Strcasestr() */
+