diff --git a/src/zabapgit.prog.abap b/src/zabapgit.prog.abap index 53163f718..4de40e61b 100644 --- a/src/zabapgit.prog.abap +++ b/src/zabapgit.prog.abap @@ -3,7 +3,7 @@ REPORT zabapgit LINE-SIZE 100. * See http://www.abapgit.org CONSTANTS: gc_xml_version TYPE string VALUE 'v1.0.0', "#EC NOTEXT - gc_abap_version TYPE string VALUE 'v1.21.2'. "#EC NOTEXT + gc_abap_version TYPE string VALUE 'v1.21.3'. "#EC NOTEXT ******************************************************************************** * The MIT License (MIT) diff --git a/src/zabapgit_zip.prog.abap b/src/zabapgit_zip.prog.abap index 44b3cf79b..45667324e 100644 --- a/src/zabapgit_zip.prog.abap +++ b/src/zabapgit_zip.prog.abap @@ -384,7 +384,11 @@ CLASS lcl_zip IMPLEMENTATION. ev_path = -path ev_filename = -filename ). - -data = lv_xstr. + -data = lv_xstr. + + -sha1 = lcl_hash=>sha1( iv_type = gc_type-blob + iv_data = -data ). + ENDLOOP. normalize_path( CHANGING ct_files = rt_files ).