From 5680b930eed509797ded007897e246db50feda41 Mon Sep 17 00:00:00 2001
From: mysticbbs <mysticbbs@gmail.com>
Date: Mon, 2 Apr 2012 04:57:40 -0400
Subject: [PATCH] Now properly sets the default Theme script/template paths.

---
 mystic/install.pas | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/mystic/install.pas b/mystic/install.pas
index a93051d..5bebdfe 100644
--- a/mystic/install.pas
+++ b/mystic/install.pas
@@ -462,9 +462,11 @@ Begin
 	While Not Eof(LangFile) Do Begin
 		Read (LangFile, TLang);
 
-    TLang.FileName := 'default';
-		TLang.TextPath := Lang.TextPath;
-		TLang.MenuPath := Lang.MenuPath;
+    TLang.FileName     := 'default';
+		TLang.TextPath     := Lang.TextPath;
+		TLang.MenuPath     := Lang.MenuPath;
+    TLang.TemplatePath := Lang.TextPath;
+    TLang.ScriptPath   := Config.ScriptPath;
 
 		Seek	(LangFile, FilePos(LangFile) - 1);
 		Write (LangFile, TLang);