anchor.diff:  
     ENDMETHOD.                    "on_event
   
  -  METHOD set_page.
  +  METHOD back.
  +
  +    DATA: lv_index TYPE i.
  +
  +
  +    lv_index = lines( gt_stack ).
  +
  +    IF lv_index = 0.
  +      RETURN.
  +    ENDIF.
  +
  +    READ TABLE gt_stack INDEX lv_index INTO gi_page.
  +    ASSERT sy-subrc = 0.
  +
  +    DELETE gt_stack INDEX lv_index.
  +    ASSERT sy-subrc = 0.
  +
  +    render( ).
  +
  +  ENDMETHOD.
  +
  +  METHOD call_page.
   
       IF NOT go_html_viewer IS BOUND.
         startup( ).
  +    ENDIF.
  +
  +    IF NOT gi_page IS INITIAL.
  +      APPEND gi_page TO gt_stack.
       ENDIF.
   
       gi_page = ii_page.
  
positive.code: 
    ENDMETHOD.                    "run
  
  ENDCLASS.                    "ltcl_dangerous IMPLEMENTATION
  
negative.code: * See http://www.abapgit.org
  
  CONSTANTS: gc_xml_version  TYPE string VALUE 'v1.0.0',      "#EC NOTEXT
             gc_abap_version TYPE string VALUE 'v1.3.2'.      "#EC NOTEXT
  
  ********************************************************************************
  * The MIT License (MIT)
  