From 22af64fb095c6e54cc4ec8256888b8422b9cc29c Mon Sep 17 00:00:00 2001
From: mysticbbs <mysticbbs@gmail.com>
Date: Fri, 28 Sep 2012 18:24:50 -0400
Subject: [PATCH] A20 sync

---
 mystic/bbs_msgbase.pas     |  4 ++--
 mystic/bbs_msgbase_jam.pas |  1 -
 mystic/mutil.ini           | 16 +++++++++-------
 mystic/mutil.pas           |  4 ++--
 mystic/mutil_status.pas    |  2 +-
 mystic/mutil_toplists.pas  | 10 +++++-----
 6 files changed, 19 insertions(+), 18 deletions(-)

diff --git a/mystic/bbs_msgbase.pas b/mystic/bbs_msgbase.pas
index b2ed7c9..faa0c86 100644
--- a/mystic/bbs_msgbase.pas
+++ b/mystic/bbs_msgbase.pas
@@ -969,7 +969,7 @@ Begin
       If DoWrap Then Begin
         If WrapData <> '' Then Begin
           If TempStr = '' Then Begin
-            WriteLn (QuoteFile, Initials + WrapData);
+            WriteLn (QuoteFile, Initials + strStripB(WrapData, ' '));
             WriteLn (QuoteFile, Initials);
 
             WrapData := '';
@@ -977,7 +977,7 @@ Begin
             Continue;
           End;
 
-          TempStr := WrapData + ' ' + TempStr;
+          TempStr := strStripB(WrapData, ' ') + ' ' + strStripL(TempStr, ' ');
         End;
 
         strWrap (TempStr, WrapData, 75);
diff --git a/mystic/bbs_msgbase_jam.pas b/mystic/bbs_msgbase_jam.pas
index 4630b48..3401075 100644
--- a/mystic/bbs_msgbase_jam.pas
+++ b/mystic/bbs_msgbase_jam.pas
@@ -1263,7 +1263,6 @@ Begin
   IsFileReq := (MsgHdr^.JamHdr.Attr1 and Jam_Freq) <> 0;
 End;
 
-
 Function TMsgBaseJAM.IsRcvd: Boolean; {Is current msg received}
 Begin
   IsRcvd := (MsgHdr^.JamHdr.Attr1 and Jam_Rcvd) <> 0;
diff --git a/mystic/mutil.ini b/mystic/mutil.ini
index 5e3d4ab..854c5c2 100644
--- a/mystic/mutil.ini
+++ b/mystic/mutil.ini
@@ -55,14 +55,16 @@
 
 	Import_FIDONET.NA  = false
 	Import_FILEBONE.NA = false
-	Import_FILES.BBS   = true
-	MassUpload         = true
-	GenerateTopLists   = true
-	GenerateAllFiles   = true
-	PurgeMessageBases  = true
-	PackMessageBases   = true
-	PostTextFiles      = true
+	Import_FILES.BBS   = false
+	MassUpload         = false
+	GenerateTopLists   = false
+	GenerateAllFiles   = false
+	PurgeMessageBases  = false
+	PostTextFiles      = false
+
+	; work in progress
 	LinkMessageBases   = false
+	PackMessageBases   = false
 
 ; ==========================================================================
 ; ==========================================================================
diff --git a/mystic/mutil.pas b/mystic/mutil.pas
index b17aec6..e171d02 100644
--- a/mystic/mutil.pas
+++ b/mystic/mutil.pas
@@ -71,7 +71,7 @@ End;
 
 Procedure ApplicationShutdown;
 Begin
-  Log (1, '+', 'Shutdown');
+  Log (1, '+', '=> Shutdown');
   Log (1, '+', '');
 
   If Assigned(Console) Then Begin
@@ -177,7 +177,7 @@ Var
 Begin
   ApplicationStartup;
 
-  Log (1, '+', 'Startup using ' + JustFile(INI.FileName));
+  Log (1, '+', '=> Startup using ' + JustFile(INI.FileName));
 
   // Build process list
 
diff --git a/mystic/mutil_status.pas b/mystic/mutil_status.pas
index d63f9f7..b90449a 100644
--- a/mystic/mutil_status.pas
+++ b/mystic/mutil_status.pas
@@ -46,7 +46,7 @@ Begin
   Console.WriteXYPipe (33, Console.CursorY, 7, 31, Str);
 
   If Last Then
-    Log (1, '+', 'Result: ' + strStripPipe(Str))
+    Log (1, '+', 'Results: ' + strStripPipe(Str))
   Else
     Log (2, '+', '   ' + Str);
 End;
diff --git a/mystic/mutil_toplists.pas b/mystic/mutil_toplists.pas
index 0cbdcf3..9980b5d 100644
--- a/mystic/mutil_toplists.pas
+++ b/mystic/mutil_toplists.pas
@@ -162,11 +162,11 @@ Begin
   Result := True;
 
   Case ListType of
-    TopCall : ProcessStatus('Top Callers', True);
-    TopPost : ProcessStatus('Top Posts', True);
-    TopDL   : ProcessStatus('Top Downloaders', True);
-    TopUL   : ProcessStatus('Top Uploaders', True);
-    TopPCR  : ProcessStatus('Top Post/Call Ratio', True);
+    TopCall : ProcessStatus('Top Callers', False);
+    TopPost : ProcessStatus('Top Posts', False);
+    TopDL   : ProcessStatus('Top Downloaders', False);
+    TopUL   : ProcessStatus('Top Uploaders', False);
+    TopPCR  : ProcessStatus('Top Post/Call Ratio', False);
   End;
 
   ExclName := INI.ReadString(Header_TopLists, 'exclude_list', 'exclude.txt');