anchor.diff:  
       lv_text = lcl_git_branch_list=>get_display_name( iv_branch ).
   
  -    CASE lcl_git_branch_list=>get_type( iv_branch ). "TODO
  -      WHEN lcl_git_branch_list=>c_type-branch.
  -      WHEN lcl_git_branch_list=>c_type-tag.
  -      WHEN OTHERS.
  -    ENDCASE.
  -
  -    CREATE OBJECT ro_html.
  +    IF iv_branch = io_repo->get_head_branch_name( ) OR iv_branch = lcl_git_branch_list=>head_name.
  +      lv_class = 'branch branch_head'.
  +    ELSEIF lcl_git_branch_list=>get_type( iv_branch ) = lcl_git_branch_list=>c_type-branch.
  +      lv_class = 'branch branch_branch'.
  +    ELSE.
  +      lv_class = 'branch'.
  +    ENDIF.
  +
  +    CREATE OBJECT ro_html.
  +    ro_html->add( |<span class="{ lv_class }">| ).
  +    ro_html->add( '<img src="img/branch">' ).
       IF iv_interactive = abap_true.
  -      ro_html->add( |<span class="{ lv_class }">| ).
         ro_html->add_anchor( iv_act = |switch_branch?{ io_repo->get_key( ) }|
  -                           iv_txt = lv_text ). "TODO refactor
  -      ro_html->add( '</span>' ).
  +                           iv_txt = lv_text ).
       ELSE.
  -      ro_html->add( |<span class="{ lv_class }">{ lv_text }</span>| ).
  -    ENDIF.
  +      ro_html->add( lv_text ).
  +    ENDIF.
  +    ro_html->add( '</span>' ).
   
     ENDMETHOD.  "render_branch_span
   
  
positive.code:     _add '  margin-left: 0.2em;'.
      _add '  margin-right: 0.5em;'.
      _add '}'.
  
      " Other and outdated (?) styles
      _add '/* MISC AND REFACTOR */'.
  
negative.code:     IF io_repo->is_offline( ) = abap_false.
        lo_repo_online ?= io_repo.
        IF iv_show_branch = abap_true.
          IF iv_branch IS INITIAL.
            ro_html->add( render_branch_span( iv_branch      = lo_repo_online->get_branch_name( )
                                              io_repo        = lo_repo_online
  