From 537c982306039df02d1e9410dfe205639b547e7a Mon Sep 17 00:00:00 2001
From: Richard Levitte <levitte@openssl.org>
Date: Sat, 19 Mar 2011 10:58:14 +0000
Subject: After some adjustments, apply the changes OpenSSL 1.0.0d on OpenVMS
 submitted by Steven M. Schweda <sms@antinode.info>

---
 apps/CA.com | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'apps/CA.com')

diff --git a/apps/CA.com b/apps/CA.com
index 02682e424a..00266db521 100644
--- a/apps/CA.com
+++ b/apps/CA.com
@@ -114,8 +114,8 @@ $!
 $   IF F$SEARCH(CATOP+".private"+CAKEY) .EQS. ""
 $   THEN
 $     READ '__INPUT' FILE -
-	   /PROMT="CA certificate filename (or enter to create)"
-$     IF F$SEARCH(FILE) .NES. ""
+	   /PROMPT="CA certificate filename (or enter to create): "
+$     IF (FILE .NES. "") .AND. (F$SEARCH(FILE) .NES. "")
 $     THEN
 $       COPY 'FILE' 'CATOP'.private'CAKEY'
 $	RET=$STATUS
-- 
cgit v1.2.3