anchor.diff:  
   
     METHOD read_settings.
  -
       DATA lo_settings_persistence TYPE REF TO lcl_persistence_settings.
       lo_settings_persistence = lcl_app=>settings( ).
       mo_settings = lo_settings_persistence->read( ).
  +  ENDMETHOD.
   
  +  METHOD render_development_internals.
  +    DATA lv_checked TYPE string.
  +    IF mo_settings->get_run_critical_tests( ) = abap_true.
  +      lv_checked = 'checked'.
  +    ENDIF.
  +    CREATE OBJECT ro_html.
  +    ro_html->add( |<h2>abapGit Development Internals settings</h2>| ).
  +    ro_html->add( `<input type="checkbox" name="critical_tests" value="X" `
  +                   && lv_checked && ` > Enable critical unit tests (see LTCL_DANGEROUS)` ).
  +    ro_html->add( |<br>| ).
  +    ro_html->add( |<br>| ).
     ENDMETHOD.
   
   ENDCLASS.
positive.code:     METHODS styles
        RETURNING VALUE(ro_html) TYPE REF TO lcl_html_helper.
      METHODS render_proxy
        RETURNING VALUE(ro_html) TYPE REF TO lcl_html_helper.
      METHODS render_form_begin
        RETURNING VALUE(ro_html) TYPE REF TO lcl_html_helper.
  
negative.code: 
      ro_html->add( render_form_begin( ) ).
      ro_html->add( render_proxy( ) ).
      ro_html->add( |<hr>| ).
      ro_html->add( render_development_internals( ) ).
      ro_html->add( render_form_end( ) ).
    ENDMETHOD.
  
  