anchor.diff:  CONSTANTS: gc_newline TYPE abap_char1 VALUE cl_abap_char_utilities=>newline.
   
   CONSTANTS: gc_english TYPE spras VALUE 'E'.
  +
  +CONSTANTS: gc_abapgit_homepage TYPE string VALUE 'http://www.abapgit.org'.
   
   DEFINE _raise.
     RAISE EXCEPTION TYPE lcx_exception
  
positive.code:           lcl_repo_srv=>get( lv_key )->refresh( ).
          ENDIF.
          rv_state = gc_event_state-re_render.
        WHEN 'hide'.
          lv_key = iv_getdata.
          go_user->hide( lv_key ).
          rv_state = gc_event_state-re_render.
        WHEN 'unhide'.
          lv_key = iv_getdata.
          go_user->unhide( lv_key ).
          rv_state = gc_event_state-re_render.
        WHEN 'stage'.
          lv_key = iv_getdata.
          stage( lv_key ).
        WHEN 'diff'.
          file_decode( EXPORTING iv_string = iv_getdata
                       IMPORTING ev_key    = lv_key
                                 es_file   = ls_file ).
          diff( is_file   = ls_file
                iv_key    = lv_key ).
        WHEN 'jump'.
          CLEAR ls_item.
          jump_decode( EXPORTING iv_string = iv_getdata
                       IMPORTING ev_obj_type = ls_item-obj_type
                                 ev_obj_name = ls_item-obj_name ).
          lcl_objects=>jump( ls_item ).
        WHEN 'pull'.
          lv_key = iv_getdata.
          pull( lv_key ).
          rv_state = gc_event_state-re_render.
        WHEN 'newoffline'.
          newoffline( ).
          rv_state = gc_event_state-re_render.
        WHEN 'db'.
          CREATE OBJECT lo_db.
          lcl_gui=>get( )->call_page( lo_db ).
        WHEN 'background'.
          CREATE OBJECT lo_background.
          lcl_gui=>get( )->call_page( lo_background ).
        WHEN 'zipimport'.
          lv_key = iv_getdata.
          lcl_zip=>import( lv_key ).
          rv_state = gc_event_state-re_render.
        WHEN 'zipexport'.
          lv_key = iv_getdata.
          lcl_zip=>export( lcl_repo_srv=>get( lv_key ) ).
        WHEN 'files_commit'.
          lv_key = iv_getdata.
          lcl_zip=>export( io_repo = lcl_repo_srv=>get( lv_key )
                           iv_zip  = abap_false ).
        WHEN 'abapgit_installation'.
          abapgit_installation( ).
          rv_state = gc_event_state-re_render.
        WHEN 'packagezip'.
          package_zip( ).
      ENDCASE.
  
    ENDMETHOD.
  
negative.code:       RAISING   lcx_exception.
  
    PRIVATE SECTION.
      METHODS get_home_page    RETURNING VALUE(ro_page) TYPE REF TO lif_gui_page.
      METHODS get_explore_page RETURNING VALUE(ro_page) TYPE REF TO lif_gui_page.
  
      METHODS abapgit_installation
        RAISING lcx_exception.
  
      METHODS repo_clone
        IMPORTING iv_url TYPE string
        RAISING   lcx_exception.
  
  ENDCLASS.
  
  *----------------------------------------------------------------------*
  