From 9fc9b55237d3f8abb0f0efb2bf26bc58bcd234bb Mon Sep 17 00:00:00 2001
From: Richard Levitte <levitte@openssl.org>
Date: Mon, 21 Mar 2005 13:52:12 +0000
Subject: [PATCH] There are cases when there are no files left to verify.  Make
 sure to handle that properly.

---
 test/tverify.com | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/test/tverify.com b/test/tverify.com
index f97e71478f..2060184d1e 100644
--- a/test/tverify.com
+++ b/test/tverify.com
@@ -15,12 +15,15 @@ $	f = f$search("[-.certs]*.pem")
 $	if f .nes. "" .and. f .nes. old_f
 $	then
 $	    certs = certs + " [-.certs]" + f$parse(f,,,"NAME") + ".pem"
-$	    if f$length(certs) .lt. 180 then goto loop_certs2
 $	    c := YES
+$	    if f$length(certs) .lt. 180 then goto loop_certs2
 $	endif
 $	certs = certs - " "
 $
-$	mcr 'exe_dir'openssl verify "-CAfile" certs.tmp 'certs'
-$	if c then goto loop_certs
+$	if c
+$	then
+$	    mcr 'exe_dir'openssl verify "-CAfile" certs.tmp 'certs'
+$	    goto loop_certs
+$	endif
 $
 $	delete certs.tmp;*
-- 
2.34.1