Backport patch from stskeeps for checking success of gnutls cert generation

git-svn-id: http://svn.inspircd.org/repository/trunk/inspircd@7435 e03df62e-2008-0410-955e-edbf42e46eb7

1 files changed, 12 insertions, 7 deletions

diff --git a/configure b/configure
index fca38ccb9..0a5674722 100755
--- a/configure
+++ b/configure
@@ -713,13 +713,18 @@ if ($config{USE_GNUTLS} eq "y") {
 * few times and get that HD going :) Then answer the        *
 * Questions which follow. If you are unsure, just hit enter *
 *************************************************************\n\n";
-			make_gnutls_cert();
-			print "\nCertificate generation complete, copying to config directory... ";
-			system("mv key.pem $config{CONFIG_DIR}/key.pem");
-			system("mv cert.pem $config{CONFIG_DIR}/cert.pem");
-			print "Done.\n\n";
-		} else {
-			print "SSL Certificates found, skipping.\n\n"
+			make_gnutls_cert() or $failed = 1;
+			if (!$failed) {
+				print "\nCertificate generation complete, copying to config directory... ";
+				system("mv key.pem $config{CONFIG_DIR}/key.pem");
+				system("mv cert.pem $config{CONFIG_DIR}/cert.pem");
+				print "Done.\n\n";
+			} else {
+				print "\n\033[1;32mCertificate generation failed!\033[0m\n\n";
+			}
+		}
+		else {
+			print "SSL Certificates found, skipping.\n\n";
 		}
 	}
 	else