using AdditionalFMONames

diff --git a/bottleclient/SakuraSeekerInstance.pas b/bottleclient/SakuraSeekerInstance.pas
index adfbcd7..9b07280 100755 (executable)
--- a/bottleclient/SakuraSeekerInstance.pas
+++ b/bottleclient/SakuraSeekerInstance.pas
@@ -2,7 +2,7 @@ unit SakuraSeekerInstance;
 
 interface
 
-uses SakuraSeeker;
+uses SakuraSeeker, SysUtils, Classes, Forms, BottleDef;
 
 function SakuraSeeker: TSakuraSeeker;
 
@@ -14,6 +14,9 @@ function SakuraSeeker: TSakuraSeeker;
 begin
   if Instance = nil then Instance := TSakuraSeeker.Create(nil);
   Result := Instance;
+  with Instance do begin
+    FileMappingTarget.AddStrings(Pref.AdditionalFMOName);
+  end;
 end;
 
 initialization