aboutsummaryrefslogtreecommitdiff
path: root/main.F90
diff options
context:
space:
mode:
authorJeffrey Armstrong <jeff@approximatrix.com>2020-05-06 15:56:17 -0400
committerJeffrey Armstrong <jeff@approximatrix.com>2020-05-06 15:56:17 -0400
commitb7e9966907434c6f58efa1307b2118a470c63d2b (patch)
tree42b496444cb1e08607867410f8c57e07d66cc0f9 /main.F90
parentb32558e3fb7021bb7fe2af311aaa535c79fc5637 (diff)
downloadLR-87-b7e9966907434c6f58efa1307b2118a470c63d2b.zip
LR-87-b7e9966907434c6f58efa1307b2118a470c63d2b.tar.gz
Back functionality now works
Diffstat (limited to 'main.F90')
-rw-r--r--main.F907
1 files changed, 6 insertions, 1 deletions
diff --git a/main.F90 b/main.F90
index f31a3ca..66e6d57 100644
--- a/main.F90
+++ b/main.F90
@@ -116,7 +116,12 @@ implicit none
select case(r%request_action(input))
case (render_action_quit)
running = .false.
-
+
+ case (render_action_back)
+ call back_location(locations_visited, current_url)
+ call free_lines(first_line)
+ loaded = .false.
+
case (render_action_layout)
call r%report_status("Performing Layout")
call layout_lines(first_line, r)