From cd78d6e8e05876603a76e155ec3a98f9726fce47 Mon Sep 17 00:00:00 2001 From: larshp Date: Sun, 13 May 2018 09:34:33 +0000 Subject: [PATCH] Moving an object should be a deletion #1378 --- src/zcl_abapgit_file_status.clas.abap | 11 +++++++++++ 1 file changed, 11 insertions(+) diff --git a/src/zcl_abapgit_file_status.clas.abap b/src/zcl_abapgit_file_status.clas.abap index 644181617..2a636b9ce 100644 --- a/src/zcl_abapgit_file_status.clas.abap +++ b/src/zcl_abapgit_file_status.clas.abap @@ -190,6 +190,7 @@ CLASS ZCL_ABAPGIT_FILE_STATUS IMPLEMENTATION. lt_items TYPE zif_abapgit_definitions=>ty_items_tt, ls_item LIKE LINE OF lt_items, lv_is_xml TYPE abap_bool, + lt_super TYPE zif_abapgit_sap_package=>ty_devclass_tt, lt_items_idx TYPE zif_abapgit_definitions=>ty_items_ts, lt_state_idx TYPE zif_abapgit_definitions=>ty_file_signatures_ts. " Sorted by path+filename @@ -238,6 +239,16 @@ CLASS ZCL_ABAPGIT_FILE_STATUS IMPLEMENTATION. ls_item-devclass = zcl_abapgit_tadir=>get_object_package( iv_object = ls_item-obj_type iv_obj_name = ls_item-obj_name ). + + IF NOT ls_item-devclass IS INITIAL. +* make sure the package is under the repo main package + lt_super = zcl_abapgit_sap_package=>get( iv_devclass )->list_superpackages( ). + READ TABLE lt_super WITH KEY table_line = ls_item-devclass TRANSPORTING NO FIELDS. + IF sy-subrc <> 0. + CLEAR ls_item-devclass. + ENDIF. + ENDIF. + APPEND ls_item TO lt_items. ENDLOOP.