diff options
Diffstat (limited to 'render.f90')
-rw-r--r-- | render.f90 | 11 |
1 files changed, 11 insertions, 0 deletions
@@ -45,6 +45,7 @@ implicit none procedure::render_proportional procedure::type_supported procedure::status_ready + procedure::report_unsupported_protocol procedure(initialize), deferred::initialize procedure(prepare_for_layout), deferred::prepare_for_layout @@ -239,6 +240,16 @@ contains end subroutine status_ready + subroutine report_unsupported_protocol(self, url) + implicit none + + class(renderer)::self + character(*), intent(in)::url + + call self%draw_error("Only gemini:// URLs supported ("//url//")") + + end subroutine report_unsupported_protocol + function width_of_line(r, text, startpos, endpos, heading_level, list_item) implicit none |