delete online repo after error if new

This commit is contained in:
bigld 2017-06-11 22:18:38 +02:00
parent a17b32a7b0
commit 34b9c9a1a1
2 changed files with 17 additions and 0 deletions

View File

@ -147,6 +147,9 @@ CLASS lcl_repo_online DEFINITION INHERITING FROM lcl_repo FINAL.
initialize
RAISING lcx_exception,
actualize_head_branch
RAISING lcx_exception,
delete_initial_online_repo
importing iv_commit type flag
RAISING lcx_exception.
ENDCLASS. "lcl_repo_online DEFINITION

View File

@ -295,6 +295,20 @@ CLASS lcl_repo_online IMPLEMENTATION.
ENDMETHOD. " rebuild_local_checksums.
METHOD delete_initial_online_repo.
IF me->is_offline( ) = abap_false AND me->get_sha1_local( ) IS INITIAL.
lcl_app=>repo_srv( )->delete( me ).
IF iv_commit = abap_true.
COMMIT WORK.
ENDIF.
ENDIF.
ENDMETHOD. " delete_initial_online_repo
ENDCLASS. "lcl_repo_online IMPLEMENTATION
*----------------------------------------------------------------------*