X-Git-Url: http://deadsoftware.ru/gitweb?p=mp2df.git;a=blobdiff_plain;f=mp2df.pas;h=989e66ba3347a3abe054e82946554057572b6c95;hp=f25ee8889fd5f4f315b4a1a97ec8b5896d410251;hb=6b2088e564090174afc8dc1eaf32df2d8c4d7a8e;hpb=1b074e6b434e2f1dc7223af0bb8fef2e13f8613c

diff --git a/mp2df.pas b/mp2df.pas
index f25ee88..989e66b 100644
--- a/mp2df.pas
+++ b/mp2df.pas
@@ -943,7 +943,7 @@ program mp2df;
     while (i <= ParamCount) and (not done) do
     begin
       str := ParamStr(i);
-      done := str[1] <> '-';
+      done := (Length(str) = 0) or (str[1] <> '-');
       if not done then
       begin
         case str of