From a3113e4b7a293696ad6844c0ec63b42e2456b43e Mon Sep 17 00:00:00 2001
From: Marty Kraimer <mrkraimer@comcast.net>
Date: Mon, 26 Jul 1993 15:31:32 +0000
Subject: [PATCH] raise SCAN_ALARM only if sevr increases

---
 src/db/dbAccess.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/db/dbAccess.c b/src/db/dbAccess.c
index 09264bec3..4855d6946 100644
--- a/src/db/dbAccess.c
+++ b/src/db/dbAccess.c
@@ -226,6 +226,7 @@ long dbProcess(struct dbCommon *precord)
 		/* raise scan alarm after MAX_LOCK times */
 		if(precord->stat==SCAN_ALARM) goto all_done;
 		if(precord->lcnt++ !=MAX_LOCK) goto all_done;
+		if(precord->sevr>=MAJOR_ALARM) all_done;
 		precord->sevr = MAJOR_ALARM;
 		precord->stat = SCAN_ALARM;
 		precord->nsev = 0;