aboutsummaryrefslogtreecommitdiff
path: root/dumb_render.f90
diff options
context:
space:
mode:
Diffstat (limited to 'dumb_render.f90')
-rw-r--r--dumb_render.f904
1 files changed, 3 insertions, 1 deletions
diff --git a/dumb_render.f90 b/dumb_render.f90
index 9172557..e6ca671 100644
--- a/dumb_render.f90
+++ b/dumb_render.f90
@@ -258,7 +258,7 @@ contains
character(*), intent(out)::input
- write(*, '(A68)', advance='no') "*** [A] PgUp | [Z] PgDn | [#] Link | [U] URL | [Q] Quit => "
+ write(*, '(A68)', advance='no') "*** [A]/[Z] PgUp/PgDn | [#] Link | [B] Back | [U] URL | [Q] Quit => "
read(*, *) input
end subroutine prompt_user
@@ -285,6 +285,8 @@ contains
else if(trim(input) == "z" .or. trim(input) == "Z") then
self%first_line = self%first_line + 24
dumb_action = render_action_layout
+ else if(trim(input) == "b" .or. trim(input) == "B") then
+ dumb_action = render_action_back
else if(trim(input) == "q" .or. trim(input) == "Q") then
dumb_action = render_action_quit
else if(trim(input) == "u" .or. trim(input) == "U") then