File openssl-fips-clearerror.patch of Package openssl.1633

Index: openssl-1.0.1i/crypto/o_init.c
===================================================================
--- openssl-1.0.1i.orig/crypto/o_init.c
+++ openssl-1.0.1i/crypto/o_init.c
@@ -73,7 +73,7 @@ static void init_fips_mode(void)
 
        /* Ensure the selftests always run */
        FIPS_mode_set(1);
-	
+
 	if (getenv("OPENSSL_FORCE_FIPS_MODE") != NULL)
 		{
 		buf[0] = '1';
@@ -94,6 +94,7 @@ static void init_fips_mode(void)
                NONFIPS_selftest_check();
                /* drop down to non-FIPS mode if it is not requested */
                FIPS_mode_set(0);
+               ERR_clear_error();
                }
        else
 		{