* fixed access violation without file on command line

This commit is contained in:
armin 2005-01-01 19:56:29 +00:00
parent 7d1dd39ecc
commit 67de07c897

View File

@ -193,8 +193,10 @@ begin
TranslateDocStrings(DocLang);
end;
if (cmdLineAction<>ActionHelp) and (InputFile1='') and (InputFile2='') then
Writeln(StdErr,SErrNoInputFile)
else if (InputFile2='') and (CmdLineAction<>ActionList) then
begin
Writeln(StdErr,SErrNoInputFile);
cmdLineAction := actionHelp;
end else if (InputFile2='') and (CmdLineAction<>ActionList) then
begin
Writeln(StdErr,SWarnAssumingList);
CmdLineAction:=ActionList;
@ -334,7 +336,10 @@ end.
{
$Log$
Revision 1.3 2004-11-15 18:03:28 michael
Revision 1.4 2005-01-01 19:56:29 armin
* fixed access violation without file on command line
Revision 1.3 2004/11/15 18:03:28 michael
+ Faster inserts by sorting after all elements were parsed (suggestion by Mattias Gaertner)
Revision 1.2 2004/11/14 21:20:31 michael