i'm an idiot, and forgot '+1'

diff --git a/src/game/g_gui.pas b/src/game/g_gui.pas
index 899b35445dd9271ff7f88748e12a9184cb04aa4e..7acbf0b101213d9203f4c9562aa20bf4c868523c 100644 (file)
--- a/src/game/g_gui.pas
+++ b/src/game/g_gui.pas
@@ -2873,9 +2873,9 @@ begin
   while sm <> '' do
   begin
     i := Pos('|', sm);
-    if i = 0 then i := length(sm);
+    if i = 0 then i := length(sm)+1;
     sc := Copy(sm, 1, i-1);
-    Delete(sm, 1, i);;
+    Delete(sm, 1, i);
     if FindFirst(path+sc, faAnyFile, SR) = 0 then repeat AddItem(SR.Name); until FindNext(SR) <> 0;
     FindClose(SR);
   end;