diff --git a/mp2df.pas b/mp2df.pas
index f25ee8889fd5f4f315b4a1a97ec8b5896d410251..11d46e0358cc773fbfc1fd94d714bb9aac063b86 100644 (file)
--- a/mp2df.pas
+++ b/mp2df.pas
procedure Help;
begin
- WriteLn('Usage: mp2df [OPTION] FILE.dvl [OUTPUT]');
+ WriteLn('Usage: mp2df [OPTION] FILE.dlv [OUTPUT]');
WriteLn('Options:');
WriteLn(' -l list textures used on map and exit');
WriteLn(' -h show this help');
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