From 602cce97ac68b225c817334741279844f811c012 Mon Sep 17 00:00:00 2001
From: michael <michael@freepascal.org>
Date: Thu, 31 Dec 2015 07:49:47 +0000
Subject: [PATCH] * Write not-loaded functions in case of load fail

git-svn-id: trunk@32805 -
---
 packages/openssl/examples/test1.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/packages/openssl/examples/test1.pas b/packages/openssl/examples/test1.pas
index e2562e6a33..a72b45603b 100644
--- a/packages/openssl/examples/test1.pas
+++ b/packages/openssl/examples/test1.pas
@@ -9,6 +9,6 @@ begin
   if InitSSLInterface then
     Writeln('Success')
   else
-    Writeln('Holy shit!');
+    Writeln('Load failed, missing functions: ',OpenSSL_unavailable_functions);
 end.