Minor updates
This commit is contained in:
parent
55ca6b6b1c
commit
3ccd4786f8
|
@ -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
|
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');
|
TBBSCore(Core).SystemLog('Inactivity timeout');
|
||||||
OutFullLn (TBBSCore(Core).GetPrompt(136));
|
OutFullLn (TBBSCore(Core).GetPrompt(136));
|
||||||
|
BufFlush;
|
||||||
Halt(0);
|
Halt(0);
|
||||||
End;
|
End;
|
||||||
|
|
||||||
|
|
|
@ -238,6 +238,7 @@ Begin
|
||||||
|
|
||||||
While NodeList.FindNext(NodeData) Do Begin
|
While NodeList.FindNext(NodeData) Do Begin
|
||||||
Case ListType of
|
Case ListType of
|
||||||
|
0 : If Not FromMenu and (NodeData.Address.Net = 0) Then Continue;
|
||||||
1 : If NodeData.Keyword <> 'ZONE' Then Continue;
|
1 : If NodeData.Keyword <> 'ZONE' Then Continue;
|
||||||
2 : If (NodeData.Keyword <> 'ZONE') and (NodeData.Keyword <> 'REGION') and (NodeData.Keyword <> 'HOST') Then Continue;
|
2 : If (NodeData.Keyword <> 'ZONE') and (NodeData.Keyword <> 'REGION') and (NodeData.Keyword <> 'HOST') Then Continue;
|
||||||
End;
|
End;
|
||||||
|
@ -1113,6 +1114,8 @@ Begin
|
||||||
Areas := 0;
|
Areas := 0;
|
||||||
Session.User.ThisUser.LastMGroup := FilePos(GroupFile);
|
Session.User.ThisUser.LastMGroup := FilePos(GroupFile);
|
||||||
|
|
||||||
|
// use gettotalbases(true) here!?
|
||||||
|
|
||||||
If bbsCfg.MShowBases Then Begin
|
If bbsCfg.MShowBases Then Begin
|
||||||
Reset (MBaseFile);
|
Reset (MBaseFile);
|
||||||
Read (MBaseFile, tMBase); { Skip EMAIL base }
|
Read (MBaseFile, tMBase); { Skip EMAIL base }
|
||||||
|
|
|
@ -205,7 +205,7 @@ Begin
|
||||||
|
|
||||||
ND.SetNodeInfo(Num, NI);
|
ND.SetNodeInfo(Num, NI);
|
||||||
|
|
||||||
FileErase (bbsConfig.DataPath + 'chat' + strI2S(NI.Num) + '.dat');
|
FileErase (bbsCfg.DataPath + 'chat' + strI2S(NI.Num) + '.dat');
|
||||||
End;
|
End;
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
|
|
||||||
|
@ -266,7 +266,7 @@ Begin
|
||||||
|
|
||||||
ND.SetNodeInfo(Num, NI);
|
ND.SetNodeInfo(Num, NI);
|
||||||
|
|
||||||
FileErase (bbsConfig.DataPath + 'chat' + strI2S(NI.Num) + '.dat');
|
FileErase (bbsCfg.DataPath + 'chat' + strI2S(NI.Num) + '.dat');
|
||||||
End;
|
End;
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
|
|
||||||
|
|
|
@ -121,8 +121,8 @@ Var
|
||||||
If Not ProcessedByAreaFix(PKT) Then
|
If Not ProcessedByAreaFix(PKT) Then
|
||||||
If GetMBaseByNetZone (PKT.PKTHeader.DestZone, MBase) Then Begin
|
If GetMBaseByNetZone (PKT.PKTHeader.DestZone, MBase) Then Begin
|
||||||
For Count := 1 to ForwardSize Do
|
For Count := 1 to ForwardSize Do
|
||||||
If strUpper(strWordGet(1, ForwardList[Count], ';')) = strUpper(PKT.MsgTo) Then
|
If strUpper(strStripB(strWordGet(1, ForwardList[Count], ';'), ' ')) = strUpper(PKT.MsgTo) Then
|
||||||
PKT.MsgTo := strWordGet(2, ForwardList[Count], ';');
|
PKT.MsgTo := strStripB(strWordGet(2, ForwardList[Count], ';'), ' ');
|
||||||
|
|
||||||
CurTag := '';
|
CurTag := '';
|
||||||
|
|
||||||
|
@ -244,7 +244,7 @@ Var
|
||||||
|
|
||||||
Inc (TotalEcho);
|
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;
|
End;
|
||||||
End;
|
End;
|
||||||
|
@ -383,7 +383,7 @@ Begin
|
||||||
|
|
||||||
Inc (ForwardSize);
|
Inc (ForwardSize);
|
||||||
|
|
||||||
ForwardList[ForwardSize] := FileExt;
|
ForwardList[ForwardSize] := strStripB(FileExt, ' ');
|
||||||
Until ForwardSize = 50;
|
Until ForwardSize = 50;
|
||||||
|
|
||||||
INI.SetSequential(False);
|
INI.SetSequential(False);
|
||||||
|
|
|
@ -7,6 +7,7 @@ design elements/issues.
|
||||||
|
|
||||||
BUGS AND POSSIBLE ISSUES
|
BUGS AND POSSIBLE ISSUES
|
||||||
========================
|
========================
|
||||||
|
- fidonet NA export
|
||||||
- shift+c key in OSX does not work without shiftlock (rudi)?
|
- 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 network ID to all message bases (remove QWK net flag?)
|
||||||
- need to add QWK networking editor (type: hub, or node)
|
- need to add QWK networking editor (type: hub, or node)
|
||||||
|
@ -43,17 +44,19 @@ BUGS AND POSSIBLE ISSUES
|
||||||
|
|
||||||
FUTURE / IDEAS / WORK IN PROGRESS / NOTES
|
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?
|
- auto create qwk network message bases?
|
||||||
|
- qwk net msg dupe detection?
|
||||||
- make -CFG mode NOT use inactivity timeout
|
- make -CFG mode NOT use inactivity timeout
|
||||||
- ability when editing a posted message to be able to toggle the Private flag
|
- ability when editing a posted message to be able to toggle the Private flag
|
||||||
if the base is Pub/Priv
|
if the base is Pub/Priv
|
||||||
- when editing an already posted message with reference linkage, export the
|
- when editing an already posted message with reference linkage, export the
|
||||||
quote data from the original message...
|
quote data from the original message...
|
||||||
- in file listing jump to files by typing the file number
|
- 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
|
- 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
|
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
|
about the SENT flag and how we could determine which type it was circulated
|
||||||
|
|
|
@ -3800,4 +3800,16 @@
|
||||||
! SEEN-BY and PATH kludge lines are no longer added to exported netmail
|
! SEEN-BY and PATH kludge lines are no longer added to exported netmail
|
||||||
messages.
|
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>
|
<ALPHA 38 RELEASED>
|
||||||
|
|
Loading…
Reference in New Issue