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

Now strips lowchars from filename/basename

This commit is contained in:
mysticbbs 2012-03-04 16:59:50 -05:00
parent 01bbcbd37d
commit b4b9678212
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
mystic/mutil_importna.pas
View File

@ -46,8 +46,8 @@ Begin
If (Str[1] = ';') or (Str = '') Then Continue; If (Str[1] = ';') or (Str = '') Then Continue;
TagName := strWordGet(1, Str, ' '); TagName := strStripLow(strWordGet(1, Str, ' '));
BaseName := strStripB(Copy(Str, Pos(' ', Str), 255), ' '); BaseName := strStripLow(strStripB(Copy(Str, Pos(' ', Str), 255), ' '));
ProcessStatus (BaseName); ProcessStatus (BaseName);