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

Keep login in staging

Browse Source
This commit is contained in:
Marc Bernard 2025-03-10 18:57:39 +00:00
parent b85fb22772
commit e6d96aacef
2 changed files with 14 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
src/ui/pages/zcl_abapgit_gui_page_stage.clas.abap
View File

@ -137,7 +137,7 @@ ENDCLASS.
CLASS zcl_abapgit_gui_page_stage IMPLEMENTATION.
CLASS ZCL_ABAPGIT_GUI_PAGE_STAGE IMPLEMENTATION.
METHOD check_selected.
@ -154,6 +154,7 @@ CLASS zcl_abapgit_gui_page_stage IMPLEMENTATION.
" Check all added files if the exist in different paths (packages) without being removed
LOOP AT io_files->mt_entries ASSIGNING <ls_item> WHERE v = zif_abapgit_definitions=>c_method-add.
" Allow mixed case path, but check filename to lower case
zcl_abapgit_path=>split_file_location(
EXPORTING
iv_fullpath = <ls_item>-k
@ -161,6 +162,8 @@ CLASS zcl_abapgit_gui_page_stage IMPLEMENTATION.
ev_path = ls_file-path
ev_filename = ls_file-filename ).
ls_file-filename = to_lower( ls_file-filename ).
" Skip packages since they all have identical filenames
IF ls_file-filename <> 'package.devc.xml'.
lv_pattern = '*/' && to_upper( ls_file-filename ).
@ -235,11 +238,11 @@ CLASS zcl_abapgit_gui_page_stage IMPLEMENTATION.
CREATE OBJECT lo_component
EXPORTING
io_repo = io_repo
iv_seed = iv_seed
iv_sci_result = iv_sci_result
io_repo = io_repo
iv_seed = iv_seed
iv_sci_result = iv_sci_result
ii_force_refresh = ii_force_refresh
ii_obj_filter = ii_obj_filter.
ii_obj_filter = ii_obj_filter.
ri_page = zcl_abapgit_gui_page_hoc=>create(
iv_page_title = 'Stage'
@ -738,6 +741,7 @@ CLASS zcl_abapgit_gui_page_stage IMPLEMENTATION.
"Ignore Files that we don't want to stage, so any errors don't stop the staging process
WHERE v <> zif_abapgit_definitions=>c_method-skip.
" Allow mixed case path, but check filename to lower case
zcl_abapgit_path=>split_file_location(
EXPORTING
iv_fullpath = <ls_item>-k
@ -745,6 +749,8 @@ CLASS zcl_abapgit_gui_page_stage IMPLEMENTATION.
ev_path = ls_file-path
ev_filename = ls_file-filename ).
ls_file-filename = to_lower( ls_file-filename ).
READ TABLE ms_files-status ASSIGNING <ls_status>
WITH TABLE KEY
path = ls_file-path

4
src/utils/zcl_abapgit_path.clas.abap
View File

@ -27,6 +27,8 @@ CLASS zcl_abapgit_path DEFINITION
IMPORTING iv_path TYPE string
RETURNING VALUE(rv_filename) TYPE string.
PROTECTED SECTION.
PRIVATE SECTION.
ENDCLASS.
@ -125,7 +127,7 @@ CLASS ZCL_ABAPGIT_PATH IMPLEMENTATION.
ev_filename = iv_fullpath.
ENDIF.
ev_filename = cl_http_utility=>unescape_url( escaped = to_lower( ev_filename ) ).
ev_filename = cl_http_utility=>unescape_url( escaped = ev_filename ).
ENDMETHOD.
ENDCLASS.