diff --git a/packages/openssl/examples/test1.pas b/packages/openssl/examples/test1.pas
index 4173534f7a..f7cc73642d 100644
--- a/packages/openssl/examples/test1.pas
+++ b/packages/openssl/examples/test1.pas
@@ -16,5 +16,8 @@ begin
   Writeln('Load ',Bools[B],', missing functions: ');
   if OpenSSL_unavailable_functions<>'' then
     Writeln(OpenSSL_unavailable_functions);
+  if b then
+    writeln('Version : ',OpenSSLGetVersion(0));
+
 end.
 
diff --git a/packages/openssl/src/openssl.pas b/packages/openssl/src/openssl.pas
index 0eddad3749..2da43c6db1 100644
--- a/packages/openssl/src/openssl.pas
+++ b/packages/openssl/src/openssl.pas
@@ -1150,7 +1150,7 @@ var
   function EvpPkeyAssign(pkey: PEVP_PKEY; _type: cInt; key: Prsa): cInt;
   function EvpGetDigestByName(Name: String): PEVP_MD;
   procedure EVPcleanup;
-  function SSLeayversion(t: cInt): string;
+  function SSLeayversion(t: cInt): string;  deprecated 'For 1.1+ use OpenSSL_version';
   procedure ErrErrorString(e: cInt; var buf: string; len: cInt);
   function ErrGetError: cInt;
   procedure ErrClearError;