diff options
author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-08-23 09:36:42 +0200 |
---|---|---|
committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-08-23 09:36:42 +0200 |
commit | 2116cd04abf45ca600e759fa8fc41f3f790cafc7 (patch) | |
tree | 6cb4cecf3fefcd0a9ac070db61e8918a65dde836 | |
parent | fd7913901deefb8204c386e01ab6b18b2cac6874 (diff) | |
download | fpGUI-2116cd04abf45ca600e759fa8fc41f3f790cafc7.tar.xz |
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.
-rw-r--r-- | docview/src/frm_main.pas | 6 |
1 files changed, 3 insertions, 3 deletions
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 @@ var begin LogEvent(LogStartup, 'OpenFiles' ); - if CurrentOpenFiles.Count = 0 then - exit; // nothing to do - //if not OKToCloseFile then // exit; @@ -1175,6 +1172,9 @@ begin AssignList(tmpHelpFiles, CurrentOpenFiles ); + if CurrentOpenFiles.Count = 0 then + exit; // no help files found - nothing further to do + ProgressBar.Position := 50; SetStatus( rsDVDisplaying ); |