From 328167988aacd13b87fefa9a894c28cb3b811807 Mon Sep 17 00:00:00 2001
From: naru <bottle@mikage.to>
Date: Fri, 7 Mar 2003 20:05:05 +0000
Subject: [PATCH] Fix: Override ghost action does not work

---
 bottleclient/MainForm.pas | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/bottleclient/MainForm.pas b/bottleclient/MainForm.pas
index 379db13..9737fc5 100755
--- a/bottleclient/MainForm.pas
+++ b/bottleclient/MainForm.pas
@@ -1687,10 +1687,7 @@ begin
       if NoDispatch then begin
         frmLog.SetBottleState(Dat['MID'], lsOpened);
       end else begin
-        {Ghost := Dat['TargetGhost']; // ƒI[ƒo[ƒ‰ƒCƒh‚³‚ê‚Ä‚¢‚é‰Â”\«‚ª‚ ‚é
-        CueID := DirectSstp.SstpSENDCue(Script, false, Opt, GhostNameToSetName(Ghost));
-        if Dat['IfGhost'] <> '' then Sender := Sender + '/' + Ghost; // Dat['IfGhost'];
-        FCueGhost.AddIdGhost(CueID, Ghost, Sender, Dat['MID']);}
+        Ghost := Dat['TargetGhost']; // ƒI[ƒo[ƒ‰ƒCƒh‚³‚ê‚Ä‚¢‚é‰Â”\«‚ª‚ ‚é
         CueItem := TLogItem.Create(ltBottle, Dat['MID'], Dat['Channel'],
           Script, Ghost, Now());
         try
@@ -2183,8 +2180,8 @@ begin
         end;
         if Channel <> '' then Title := Title + '(' + Channel + ')';
       end;
+      BottleLog := TBottleLogList.Create(Title);
       try
-        BottleLog := TBottleLogList.Create(Title);
         BottleLog.OnLoaded := frmLog.LogLoaded;
         BottleLog.OnLoadFailure := frmLog.LogLoadFailure;
         BottleLog.OnLoadWork := frmLog.LogLoadWork;
-- 
2.11.0