diff --git a/mystic/bbs_core.pas b/mystic/bbs_core.pas
index c6d70cf..a6ad564 100644
--- a/mystic/bbs_core.pas
+++ b/mystic/bbs_core.pas
@@ -231,9 +231,10 @@ Begin
     FileMode := 66;
 
     {$I-}
-    Reset (PromptFile);
-    Seek  (PromptFile, N);
-    Read  (PromptFile, Prompt);
+    Assign (PromptFile, Config.DataPath + Theme.FileName + '.thm');
+    Reset  (PromptFile);
+    Seek   (PromptFile, N);
+    Read   (PromptFile, Prompt);
     {$I+}
 
     If IoResult <> 0 Then Begin