From 475fe9c7c2555565418818d3588ea8a251d939ba Mon Sep 17 00:00:00 2001
From: Lars Hvam <larshp@hotmail.com>
Date: Wed, 19 Nov 2014 13:02:57 +0100
Subject: [PATCH] bug fixed, close #19

---
 zabapgit.abap | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

diff --git a/zabapgit.abap b/zabapgit.abap
index f7e929564..61ab13c61 100644
--- a/zabapgit.abap
+++ b/zabapgit.abap
@@ -4586,6 +4586,10 @@ CLASS lcl_pack IMPLEMENTATION.
           lv_len = lv_len + lv_x * 65536.
         ENDIF.
 
+        IF lv_len = 0.
+          lv_len = 65536.
+        ENDIF.
+
         CONCATENATE lv_result lv_base+lv_offset(lv_len) INTO lv_result IN BYTE MODE.
       ELSE. " lv_bitbyte(1) = '0'
 * insert from delta
@@ -4604,12 +4608,6 @@ CLASS lcl_pack IMPLEMENTATION.
       lv_sha1 &&
       ',old: ' &&
       <ls_object>-sha1 ).                                   "#EC NOTEXT
-    IF <ls_object>-type = gc_blob.
-      lcl_debug=>message( '<pre>' &&
-        escape( val = lcl_convert=>xstring_to_string_utf8( lv_result )
-                format = cl_abap_format=>e_html_text ) &&
-        '</pre>' ).
-    ENDIF.
 
     CLEAR ls_object.
     ls_object-sha1 = lv_sha1.