From 4dba645ca629d428701587e0d9912aaa86722510 Mon Sep 17 00:00:00 2001
From: Alexey Romanov <alexey.v.romanov@gmail.com>
Date: Tue, 5 Oct 2010 13:43:53 +0400
Subject: [PATCH] Better way to find current module's directory

---
 src/sqlite3.erl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/sqlite3.erl b/src/sqlite3.erl
index 00dfdf0..af407ca 100644
--- a/src/sqlite3.erl
+++ b/src/sqlite3.erl
@@ -390,7 +390,8 @@ create_function(Db, FunctionName, Function) ->
 -spec(init/1::([any()]) -> init_return()).
 init(Options) ->
     Dbase = proplists:get_value(db, Options),
-    SearchDir = filename:join([filename:dirname(code:which(?MODULE)), "..", "ebin"]),
+    {?MODULE, _, FileName} = code:get_object_code(?MODULE),
+    SearchDir = filename:dirname(FileName),
     case erl_ddll:load(SearchDir, atom_to_list(?DRIVER_NAME)) of
       ok -> 
         Port = open_port({spawn, string:join ([atom_to_list (?DRIVER_NAME), Dbase], " ")}, [binary]),