aboutsummaryrefslogtreecommitdiff
path: root/main.F90
diff options
context:
space:
mode:
authorJeffrey Armstrong <jeffrey.armstrong@approximatrix.com>2020-05-14 17:37:50 -0400
committerJeffrey Armstrong <jeffrey.armstrong@approximatrix.com>2020-05-14 17:37:50 -0400
commit899de86b69bc3982b61fc25a8b1c7af74a0f30e9 (patch)
treef9096e19b2cac155557ea5fe256b9ccfd48d18c6 /main.F90
parente43a36b1a00a8b96585a9fb4b622645f9b5eb025 (diff)
downloadLR-87-899de86b69bc3982b61fc25a8b1c7af74a0f30e9.zip
LR-87-899de86b69bc3982b61fc25a8b1c7af74a0f30e9.tar.gz
Added scrolling and status bar to windows GUI renderer
Diffstat (limited to 'main.F90')
-rw-r--r--main.F903
1 files changed, 2 insertions, 1 deletions
diff --git a/main.F90 b/main.F90
index 16da056..6d6b78d 100644
--- a/main.F90
+++ b/main.F90
@@ -146,7 +146,7 @@ implicit none
call r%new_page()
call r%report_status("Performing Layout")
call layout_lines(first_line, r)
-
+ call r%status_ready()
else
call r%draw_error("Cannot display file of type "//return_type)
@@ -173,6 +173,7 @@ implicit none
if(associated(first_line)) then
call r%report_status("Performing Layout")
call layout_lines(first_line, r)
+ call r%status_ready()
end if
case (render_action_goto)