SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-05-01 04:08:27 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

fixes

Browse Source
This commit is contained in:
sbcgua 2016-11-12 12:04:48 +02:00
parent 9b0e1f1282
commit a7697f9a2b
2 changed files with 13 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/zabapgit_repo.prog.abap
View File

@ -117,6 +117,7 @@ CLASS lcl_repo_online DEFINITION INHERITING FROM lcl_repo FINAL.
IMPORTING io_log TYPE REF TO lcl_log OPTIONAL IMPORTING io_log TYPE REF TO lcl_log OPTIONAL
RETURNING VALUE(rt_results) TYPE ty_results_tt RETURNING VALUE(rt_results) TYPE ty_results_tt
RAISING lcx_exception, RAISING lcx_exception,
reset_status,
rebuild_local_checksums rebuild_local_checksums
RAISING lcx_exception, RAISING lcx_exception,
push push

16
src/zabapgit_repo_impl.prog.abap
View File

@ -62,16 +62,20 @@ CLASS lcl_repo_online IMPLEMENTATION.
set( iv_sha1 = mv_branch ). set( iv_sha1 = mv_branch ).
CLEAR mt_status. " Reset status reset_status( ).
COMMIT WORK AND WAIT. COMMIT WORK AND WAIT.
ENDMETHOD. "deserialize ENDMETHOD. "deserialize
METHOD reset_status.
CLEAR mt_status.
ENDMETHOD. " reset_status.
METHOD refresh. METHOD refresh.
super->refresh( iv_drop_cache ). super->refresh( iv_drop_cache ).
CLEAR mt_status. reset_status( ).
lcl_progress=>show( iv_key = 'Fetch' lcl_progress=>show( iv_key = 'Fetch'
iv_current = 1 iv_current = 1
@ -243,6 +247,7 @@ CLASS lcl_repo_online IMPLEMENTATION.
DATA: lt_remote TYPE ty_files_tt, DATA: lt_remote TYPE ty_files_tt,
lt_local TYPE ty_files_item_tt, lt_local TYPE ty_files_item_tt,
ls_last_item TYPE ty_item,
lv_branch_equal TYPE abap_bool, lv_branch_equal TYPE abap_bool,
lt_checksums TYPE lcl_persistence_repo=>ty_local_checksum_tt. lt_checksums TYPE lcl_persistence_repo=>ty_local_checksum_tt.
@ -260,10 +265,11 @@ CLASS lcl_repo_online IMPLEMENTATION.
SORT lt_remote BY path filename. SORT lt_remote BY path filename.
LOOP AT lt_local ASSIGNING <ls_local>. LOOP AT lt_local ASSIGNING <ls_local>.
AT NEW item. IF ls_last_item <> <ls_local>-item. " New item reached ?
APPEND INITIAL LINE TO lt_checksums ASSIGNING <ls_checksum>. APPEND INITIAL LINE TO lt_checksums ASSIGNING <ls_checksum>.
<ls_checksum>-item = <ls_local>-item. <ls_checksum>-item = <ls_local>-item.
ENDAT. ls_last_item = <ls_local>-item.
ENDIF.
READ TABLE lt_remote ASSIGNING <ls_remote> READ TABLE lt_remote ASSIGNING <ls_remote>
WITH KEY path = <ls_local>-file-path filename = <ls_local>-file-filename WITH KEY path = <ls_local>-file-path filename = <ls_local>-file-filename
@ -282,6 +288,8 @@ CLASS lcl_repo_online IMPLEMENTATION.
ENDLOOP. ENDLOOP.
set( it_checksums = lt_checksums ). set( it_checksums = lt_checksums ).
reset_status( ).
ENDMETHOD. " rebuild_local_checksums. ENDMETHOD. " rebuild_local_checksums.
ENDCLASS. "lcl_repo_online IMPLEMENTATION ENDCLASS. "lcl_repo_online IMPLEMENTATION