diff --git a/ChangeLog b/ChangeLog
index 8889609f2..ec7d586f4 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2005-10-22  Alexey Shchepin  <alexey@sevcom.net>
+
+	* src/ejabberd_app.erl: Try to load tls_drv at startup to avoid
+	unloading of libssl (thanks to Brian Campbell)
+
 2005-10-20  Alexey Shchepin  <alexey@sevcom.net>
 
 	* src/odbc/pg.sql: Added spool.seq field for offline messages
diff --git a/src/ejabberd_app.erl b/src/ejabberd_app.erl
index 9badb0971..9b6dc7441 100644
--- a/src/ejabberd_app.erl
+++ b/src/ejabberd_app.erl
@@ -14,8 +14,6 @@
 
 -export([start/2, stop/1, init/0]).
 
--export([dump_ports/0]).
-
 -include("ejabberd.hrl").
 
 start(normal, _Args) ->
@@ -64,7 +62,7 @@ init() ->
 		end
 	end,
     error_logger:add_report_handler(ejabberd_logger_h, LogPath),
-    %timer:apply_interval(3600000, ?MODULE, dump_ports, []),
+    erl_ddll:load_driver(ejabberd:get_so_path(), tls_drv),
     ok = erl_ddll:load_driver(ejabberd:get_so_path(), expat_erl),
     Port = open_port({spawn, expat_erl}, [binary]),
     loop(Port).
@@ -100,8 +98,3 @@ load_modules() ->
 	      end
       end, ?MYHOSTS).
 
-
-dump_ports() ->
-    ?INFO_MSG("ports:~n ~p",
-	      [lists:map(fun(P) -> erlang:port_info(P) end, erlang:ports())]).
-