Minor updates

This commit is contained in:
mysticbbs 2013-09-19 18:14:39 -04:00
parent 55ca6b6b1c
commit 3ccd4786f8
6 changed files with 29 additions and 10 deletions

View File

@ -1555,6 +1555,7 @@ Begin
If (bbsCfg.Inactivity > 0) and (Session.User.ThisUser.Flags And UserNoTimeOut = 0) and (TimerSeconds - TBBSCore(Core).TimeOut >= bbsCfg.Inactivity) Then Begin
TBBSCore(Core).SystemLog('Inactivity timeout');
OutFullLn (TBBSCore(Core).GetPrompt(136));
BufFlush;
Halt(0);
End;

View File

@ -238,6 +238,7 @@ Begin
While NodeList.FindNext(NodeData) Do Begin
Case ListType of
0 : If Not FromMenu and (NodeData.Address.Net = 0) Then Continue;
1 : If NodeData.Keyword <> 'ZONE' Then Continue;
2 : If (NodeData.Keyword <> 'ZONE') and (NodeData.Keyword <> 'REGION') and (NodeData.Keyword <> 'HOST') Then Continue;
End;
@ -1113,6 +1114,8 @@ Begin
Areas := 0;
Session.User.ThisUser.LastMGroup := FilePos(GroupFile);
// use gettotalbases(true) here!?
If bbsCfg.MShowBases Then Begin
Reset (MBaseFile);
Read (MBaseFile, tMBase); { Skip EMAIL base }

View File

@ -205,7 +205,7 @@ Begin
ND.SetNodeInfo(Num, NI);
FileErase (bbsConfig.DataPath + 'chat' + strI2S(NI.Num) + '.dat');
FileErase (bbsCfg.DataPath + 'chat' + strI2S(NI.Num) + '.dat');
End;
{$ENDIF}
@ -266,7 +266,7 @@ Begin
ND.SetNodeInfo(Num, NI);
FileErase (bbsConfig.DataPath + 'chat' + strI2S(NI.Num) + '.dat');
FileErase (bbsCfg.DataPath + 'chat' + strI2S(NI.Num) + '.dat');
End;
{$ENDIF}

View File

@ -121,8 +121,8 @@ Var
If Not ProcessedByAreaFix(PKT) Then
If GetMBaseByNetZone (PKT.PKTHeader.DestZone, MBase) Then Begin
For Count := 1 to ForwardSize Do
If strUpper(strWordGet(1, ForwardList[Count], ';')) = strUpper(PKT.MsgTo) Then
PKT.MsgTo := strWordGet(2, ForwardList[Count], ';');
If strUpper(strStripB(strWordGet(1, ForwardList[Count], ';'), ' ')) = strUpper(PKT.MsgTo) Then
PKT.MsgTo := strStripB(strWordGet(2, ForwardList[Count], ';'), ' ');
CurTag := '';
@ -244,7 +244,7 @@ Var
Inc (TotalEcho);
Log (2, '+', ' Added Msg #' + strI2S(MsgBase^.GetHighMsgNum) + ' (' + MsgBase^.GetDate + ') to ' + strStripPipe(MBase.Name));
Log (2, '+', ' Added Msg #' + strI2S(MsgBase^.GetHighMsgNum) + ' to ' + strStripPipe(MBase.Name));
End;
End;
End;
@ -383,7 +383,7 @@ Begin
Inc (ForwardSize);
ForwardList[ForwardSize] := FileExt;
ForwardList[ForwardSize] := strStripB(FileExt, ' ');
Until ForwardSize = 50;
INI.SetSequential(False);

View File

@ -7,6 +7,7 @@ design elements/issues.
BUGS AND POSSIBLE ISSUES
========================
- fidonet NA export
- shift+c key in OSX does not work without shiftlock (rudi)?
- need to add QWK network ID to all message bases (remove QWK net flag?)
- need to add QWK networking editor (type: hub, or node)
@ -43,17 +44,19 @@ BUGS AND POSSIBLE ISSUES
FUTURE / IDEAS / WORK IN PROGRESS / NOTES
=========================================
- matrix disconnect if they use the XL command too many times
- index00.html or whatever in FTP server
- buffer echomail export and use mailer LR pointers
- add mystic's downlinks to areas.bbs export?
- add exportto into mutil.ini for [ImportMessageBase] ??
- auto create qwk network message bases?
- qwk net msg dupe detection?
- make -CFG mode NOT use inactivity timeout
- ability when editing a posted message to be able to toggle the Private flag
if the base is Pub/Priv
- when editing an already posted message with reference linkage, export the
quote data from the original message...
- in file listing jump to files by typing the file number
- remove console class code from mutil since its in bbs_database
^ same with keyboard
- think through the Local flag for all QWK networking situations
as well as semaphore file creation
- add QWKNet base type or no? leaning towards no because it might limit
hybrid FIDO/QWK networks which maybe we can do currently? need to think
about the SENT flag and how we could determine which type it was circulated

View File

@ -3800,4 +3800,16 @@
! SEEN-BY and PATH kludge lines are no longer added to exported netmail
messages.
+ Mystic will now flush the buffer after displaying the Inactivity timeout
prompt so that your remote users will actually see it!
+ When sending NETMAIL, Mystic's nodelist browser will now filter out any
nodes which are part of net "0" in the address searches. Using the browser
menu command will still show them. Assuming you have Forced NL compliance
turned on, this will prevent users from ever being able to select a net 0
address.
+ Mystic's netmail fowarding will now strip leading and trailing spaces in
case of typos in the .INI.
<ALPHA 38 RELEASED>