From 3a7e98fa0c0e1bf85242a914d868102103504a60 Mon Sep 17 00:00:00 2001
From: Robin Haberkorn <robin.haberkorn@googlemail.com>
Date: Tue, 11 Oct 2011 15:18:28 +0200
Subject: fixed slang_drv path fallback and write human readable message in
 case of errors loading the driver

---
 src/slang.erl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/slang.erl b/src/slang.erl
index e90501a..4c521a9 100644
--- a/src/slang.erl
+++ b/src/slang.erl
@@ -386,7 +386,7 @@ open_slang_driver() ->
 	     {error, _} ->
 		 {ok, Dir, _} =  regexp:sub(code:which(slang),
 					    "ebin/slang.beam",[]),
-		 Dir ++ "/priv";
+		 Dir ++ "priv";
 	     Dir ->
 		 Dir
 	 end,
@@ -396,7 +396,7 @@ open_slang_driver() ->
 	{error,{already_started, _}} ->
 	    ok;
 	{error, What} ->
-	    error_logger:format("Failed to open driver ~p~n", [What]),
+	    error_logger:format("Failed to open driver: ~s~n", [erl_ddll:format_error(What)]),
 	    exit(nodriver)
     end,
     P = open_port({spawn, slang_drv}, []),
-- 
cgit v1.2.3