summaryrefslogtreecommitdiff
path: root/docview
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graeme@mastermaths.co.za>2010-08-23 09:36:42 +0200
committerGraeme Geldenhuys <graeme@mastermaths.co.za>2010-08-23 09:36:42 +0200
commit2116cd04abf45ca600e759fa8fc41f3f790cafc7 (patch)
tree6cb4cecf3fefcd0a9ac070db61e8918a65dde836 /docview
parentfd7913901deefb8204c386e01ab6b18b2cac6874 (diff)
downloadfpGUI-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.
Diffstat (limited to 'docview')
-rw-r--r--docview/src/frm_main.pas6
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 );