From 34e8e0bb69362ceea6818a4491aaef1fedb43827 Mon Sep 17 00:00:00 2001
From: Lars Hvam <larshp@hotmail.com>
Date: Sun, 24 Feb 2019 22:46:02 -0800
Subject: [PATCH] Uninstall, fix some error messages (#2451)

* SUSO, fix error message

* DDLS error message

instead of "Object could not be deleted"
---
 src/objects/zcl_abapgit_object_ddls.clas.abap | 5 +++--
 src/objects/zcl_abapgit_object_suso.clas.abap | 4 ++--
 2 files changed, 5 insertions(+), 4 deletions(-)

diff --git a/src/objects/zcl_abapgit_object_ddls.clas.abap b/src/objects/zcl_abapgit_object_ddls.clas.abap
index 9164347a8..cd2aab4a8 100644
--- a/src/objects/zcl_abapgit_object_ddls.clas.abap
+++ b/src/objects/zcl_abapgit_object_ddls.clas.abap
@@ -133,8 +133,9 @@ CLASS ZCL_ABAPGIT_OBJECT_DDLS IMPLEMENTATION.
           EXPORTING
             name = ms_item-obj_name.
       CATCH cx_root INTO lx_error.
-        zcx_abapgit_exception=>raise( iv_text     = lx_error->get_text( )
-                                      ix_previous = lx_error ).
+        zcx_abapgit_exception=>raise(
+          iv_text     = |DDLS, { ms_item-obj_name } { lx_error->get_text( ) }|
+          ix_previous = lx_error ).
     ENDTRY.
 
   ENDMETHOD.
diff --git a/src/objects/zcl_abapgit_object_suso.clas.abap b/src/objects/zcl_abapgit_object_suso.clas.abap
index a3508f484..1159f2071 100644
--- a/src/objects/zcl_abapgit_object_suso.clas.abap
+++ b/src/objects/zcl_abapgit_object_suso.clas.abap
@@ -136,7 +136,7 @@ CLASS ZCL_ABAPGIT_OBJECT_SUSO IMPLEMENTATION.
           ed_mode_head  = lv_act_head.
 
       IF lv_act_head <> lc_act_delete.
-        zcx_abapgit_exception=>raise( |AUTH { mv_objectname }: Delete not allowed| ).
+        zcx_abapgit_exception=>raise( |SUSO { mv_objectname }: Delete not allowed| ).
       ENDIF.
 
       CALL METHOD lo_suso->('SUSO_COLLECT_IN_CTS')
@@ -146,7 +146,7 @@ CLASS ZCL_ABAPGIT_OBJECT_SUSO IMPLEMENTATION.
           ed_result = lv_suso_collect_in_cts.
 
       IF lv_suso_collect_in_cts IS NOT INITIAL.
-        zcx_abapgit_exception=>raise( |AUTH { mv_objectname }: Cannot delete| ).
+        zcx_abapgit_exception=>raise( |SUSO { mv_objectname }: Cannot delete| ).
       ENDIF.
 
     ENDIF.