#! /bin/sh /usr/share/dpatch/dpatch-run
## erlangweb-1.2_for_shop-0.1.dpatch by Kirill A. Korinskiy <catap@catap.ru>
##
## All lines beginning with `## DP:' are a description of the patch.
## DP: Fix small probles in erlanweb-1.2 for shop-0.1 app

@DPATCH@

diff --git a/bin/start.erl b/bin/start.erl
index 62f8ab7..a53d70d 100755
--- a/bin/start.erl
+++ b/bin/start.erl
@@ -8,7 +8,7 @@ main([]) ->
 
     Info = get_info(),
     copy_bin_files(Info),
-
+    
     create_start_scripts(Info),
     create_start_erl_data(),
     
@@ -44,9 +44,8 @@ create_start_dirs() ->
 	    filename:join("templates", "cache"),
 	    filename:join("docroot", "conf")],
     lists:foreach(Creator, Dirs),
-    
-    {ok, Apps1} = file:list_dir("lib"),
-    Apps = lists:delete(".svn", Apps1),
+
+    {ok, Apps} = file:list_dir("lib"),
     LibDirs = lists:map(fun(X) ->
 				filename:join("lib", X) 
 			end, Apps),
@@ -67,7 +66,7 @@ prepare_paths() ->
 		  [] ->
 		      Dir;
 		  Else ->
-		      filename:join(Dir, Else)
+		      filename:join(lists:append([Dir], Else))
 	      end,
 
     {ok, Libs} = file:list_dir(filename:join(RootDir, "lib")),
diff --git a/lib/eptic-1.2/src/e_db_mnesia.erl b/lib/eptic-1.2/src/e_db_mnesia.erl
index aa2ab96..e232dc3 100644
--- a/lib/eptic-1.2/src/e_db_mnesia.erl
+++ b/lib/eptic-1.2/src/e_db_mnesia.erl
@@ -29,6 +29,7 @@
 -record(id, {table, next_id}).
 
 install() ->
+    application:start(mnesia),
     mnesia:create_table(ids_tab, [{attributes, record_info(fields, id)},
 				  {disc_copies, [node()]}]).
 
diff --git a/lib/wpart-1.2/src/validate_tool.erl b/lib/wpart-1.2/src/validate_tool.erl
index 28dcaeb..7f8bb6b 100644
--- a/lib/wpart-1.2/src/validate_tool.erl
+++ b/lib/wpart-1.2/src/validate_tool.erl
@@ -42,7 +42,7 @@ validate_cu(Type, Fun) ->
 
     case wpart_valid:validate(Type) of
         {ok, List} ->
-	    do_validate_ok(List,Type,Mod,ParentType);
+	    do_validate_ok(List,Mod,Type,ParentType);
 	{error, Reason} ->
             do_validate_error(Mod,Reason,Fun,Type,ParentType)
     end.