eric
/
mysticbbs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Some updates to help system

This commit is contained in:
mysticbbs 2012-03-16 20:05:32 -04:00
parent 6ce1060a2b
commit 79c447c7fb
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
mystic/bbs_ansi_help.pas
View File

@ -42,6 +42,7 @@ Uses
m_Strings, m_Strings,
bbs_Ansi_MenuBox, bbs_Ansi_MenuBox,
bbs_Core, bbs_Core,
bbs_Common,
MPL_Execute; MPL_Execute;
Constructor TAnsiMenuHelp.Create; Constructor TAnsiMenuHelp.Create;
@ -254,7 +255,9 @@ Begin
Template := strWordGet(2, Str, ';'); Template := strWordGet(2, Str, ';');
Keyword := strWordGet(3, Str, ';'); Keyword := strWordGet(3, Str, ';');
Assign (HelpFile, FN); If Pos(PathChar, FN) = 0 Then FN := Session.Lang.TextPath + FN;
Assign (HelpFile, FN + '.hlp');
{$I-} Reset (HelpFile); {$I+} {$I-} Reset (HelpFile); {$I+}
If IoResult <> 0 Then Exit; If IoResult <> 0 Then Exit;