This commit is contained in:
Christian Günter 2018-01-04 13:02:34 +00:00
parent abeeba0683
commit 3086ab90f8

View File

@ -269,7 +269,8 @@ CLASS lcl_services_git IMPLEMENTATION.
METHOD delete_tag. METHOD delete_tag.
DATA: lo_repo TYPE REF TO lcl_repo_online, DATA: lo_repo TYPE REF TO lcl_repo_online,
ls_tag TYPE lcl_git_branch_list=>ty_git_branch. ls_tag TYPE lcl_git_branch_list=>ty_git_branch,
lv_text TYPE string.
lo_repo ?= lcl_app=>repo_srv( )->get( iv_key ). lo_repo ?= lcl_app=>repo_srv( )->get( iv_key ).
@ -282,9 +283,13 @@ CLASS lcl_services_git IMPLEMENTATION.
io_repo = lo_repo io_repo = lo_repo
is_tag = ls_tag ). is_tag = ls_tag ).
MESSAGE |Tag { replace( val = ls_tag-name REPLACE FIRST OCCURRENCE OF zif_abapgit_definitions=>gc_tag_prefix
sub = zif_abapgit_definitions=>gc_tag_prefix IN ls_tag-name
with = '' ) } deleted| TYPE 'S'. WITH ''.
lv_text = |Tag { ls_tag-name } deleted| ##NO_TEXT.
MESSAGE lv_text TYPE 'S'.
ENDMETHOD. ENDMETHOD.