From ff2e48634d12bc39c9300ed5386a6423262399f2 Mon Sep 17 00:00:00 2001
From: larshp <larshp@hotmail.com>
Date: Mon, 7 Aug 2017 16:39:29 +0000
Subject: [PATCH] fix XML file dump, #886

---
 src/zabapgit_objects_impl.prog.abap | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/src/zabapgit_objects_impl.prog.abap b/src/zabapgit_objects_impl.prog.abap
index 2fba5ea1e..7f261aaef 100644
--- a/src/zabapgit_objects_impl.prog.abap
+++ b/src/zabapgit_objects_impl.prog.abap
@@ -699,13 +699,19 @@ CLASS lcl_objects IMPLEMENTATION.
   ENDMETHOD.
 
   METHOD compare_remote_to_local.
+* this method is used for comparing local with remote objects
+* before pull, this is useful eg. when overwriting a TABL object.
+* only the main XML file is used for comparison
 
     DATA: ls_remote_file       TYPE lif_defs=>ty_file,
           lo_remote_version    TYPE REF TO lcl_xml_input,
+          lv_count             TYPE i,
           lo_comparison_result TYPE REF TO lif_comparison_result.
 
 
-    IF is_result-filename CS '.XML'.
+    FIND ALL OCCURRENCES OF '.' IN is_result-filename MATCH COUNT lv_count.
+
+    IF is_result-filename CS '.XML' AND lv_count = 2.
       IF io_object->exists( ) = abap_false.
         RETURN.
       ENDIF.