diff --git a/src/zabapgit_page_repo_settings.prog.abap b/src/zabapgit_page_repo_settings.prog.abap index 7f8b4fff5..52889dfd5 100644 --- a/src/zabapgit_page_repo_settings.prog.abap +++ b/src/zabapgit_page_repo_settings.prog.abap @@ -59,6 +59,9 @@ CLASS lcl_gui_page_repo_settings IMPLEMENTATION. ro_html->add( 'Folder logic: ' ). ro_html->add( '
' ). + ro_html->add( 'Starting folder: ' ). + ro_html->add( '
' ). ro_html->add( '' ). ro_html->add( '' ). ro_html->add( '' ). @@ -76,12 +79,18 @@ CLASS lcl_gui_page_repo_settings IMPLEMENTATION. WHEN c_action-save_settings. lt_post_fields = parse_post( it_postdata ). + lo_dot = mo_repo->get_dot_abapgit( ). + READ TABLE lt_post_fields INTO ls_post_field WITH KEY name = 'folder_logic'. ASSERT sy-subrc = 0. - - lo_dot = mo_repo->get_dot_abapgit( ). lo_dot->set_folder_logic( ls_post_field-value ). + + READ TABLE lt_post_fields INTO ls_post_field WITH KEY name = 'starting_folder'. + ASSERT sy-subrc = 0. + lo_dot->set_starting_folder( ls_post_field-value ). + mo_repo->set_dot_abapgit( lo_dot ). + mo_repo->refresh( ). ev_state = gc_event_state-go_back. ENDCASE.