From 2116cd04abf45ca600e759fa8fc41f3f790cafc7 Mon Sep 17 00:00:00 2001 From: Graeme Geldenhuys Date: Mon, 23 Aug 2010 09:36:42 +0200 Subject: docview: fix bug where it fails to load any INF files. Fixing the loading of directory without INF files, caused loading of all INF files to fail. I did my check in the wrong location. --- docview/src/frm_main.pas | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'docview') diff --git a/docview/src/frm_main.pas b/docview/src/frm_main.pas index 8a3aa84a..15114333 100644 --- a/docview/src/frm_main.pas +++ b/docview/src/frm_main.pas @@ -1147,9 +1147,6 @@ function TMainForm.OpenFiles(const FileNames: TStrings; begin LogEvent(LogStartup, 'OpenFiles' ); - if CurrentOpenFiles.Count = 0 then - exit; // nothing to do - //if not OKToCloseFile then // exit; @@ -1175,6 +1172,9 @@ function TMainForm.OpenFiles(const FileNames: TStrings; AssignList(tmpHelpFiles, CurrentOpenFiles ); + if CurrentOpenFiles.Count = 0 then + exit; // no help files found - nothing further to do + ProgressBar.Position := 50; SetStatus( rsDVDisplaying ); -- cgit v1.2.3-54-g00ecf