mirror of
https://github.com/abapGit/abapGit.git
synced 2025-04-30 11:46:38 +08:00
Set Default Git User Details (#6920)
Co-authored-by: Marc Bernard <59966492+mbtools@users.noreply.github.com> Co-authored-by: Lars Hvam <larshp@hotmail.com>
This commit is contained in:
parent
38e785ddb0
commit
376a7d8be8
32
src/env/zcl_abapgit_settings.clas.abap
vendored
32
src/env/zcl_abapgit_settings.clas.abap
vendored
|
@ -156,6 +156,18 @@ CLASS zcl_abapgit_settings DEFINITION
|
|||
METHODS set_activate_wo_popup
|
||||
IMPORTING
|
||||
!iv_act_wo_popup TYPE zif_abapgit_definitions=>ty_s_user_settings-activate_wo_popup .
|
||||
METHODS set_default_git_uname
|
||||
IMPORTING
|
||||
!iv_default_git_uname TYPE string.
|
||||
METHODS get_default_git_uname
|
||||
RETURNING
|
||||
VALUE(rv_default_git_uname) TYPE string.
|
||||
METHODS set_default_git_email
|
||||
IMPORTING
|
||||
!iv_default_git_email TYPE string.
|
||||
METHODS get_default_git_email
|
||||
RETURNING
|
||||
VALUE(rv_default_git_email) TYPE string.
|
||||
PROTECTED SECTION.
|
||||
PRIVATE SECTION.
|
||||
TYPES: BEGIN OF ty_s_settings,
|
||||
|
@ -491,4 +503,24 @@ CLASS zcl_abapgit_settings IMPLEMENTATION.
|
|||
cg_data = ms_settings ).
|
||||
|
||||
ENDMETHOD.
|
||||
|
||||
|
||||
METHOD get_default_git_uname.
|
||||
rv_default_git_uname = ms_user_settings-default_git_uname.
|
||||
ENDMETHOD.
|
||||
|
||||
|
||||
METHOD set_default_git_uname.
|
||||
ms_user_settings-default_git_uname = iv_default_git_uname.
|
||||
ENDMETHOD.
|
||||
|
||||
|
||||
METHOD get_default_git_email.
|
||||
rv_default_git_email = ms_user_settings-default_git_email.
|
||||
ENDMETHOD.
|
||||
|
||||
|
||||
METHOD set_default_git_email.
|
||||
ms_user_settings-default_git_email = iv_default_git_email.
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
|
|
|
@ -39,6 +39,9 @@ CLASS zcl_abapgit_gui_page_sett_pers DEFINITION
|
|||
hide_sapgui_hint TYPE string VALUE 'hide_sapgui_hint',
|
||||
activate_wo_popup TYPE string VALUE 'activate_wo_popup',
|
||||
label_colors TYPE string VALUE 'label_colors',
|
||||
git_default_values TYPE string VALUE 'git_default_values',
|
||||
default_git_uname TYPE string VALUE 'default_git_uname',
|
||||
default_git_email TYPE string VALUE 'default_git_email',
|
||||
END OF c_id.
|
||||
CONSTANTS:
|
||||
BEGIN OF c_event,
|
||||
|
@ -188,6 +191,15 @@ CLASS zcl_abapgit_gui_page_sett_pers IMPLEMENTATION.
|
|||
iv_name = c_id-parallel_proc_disabled
|
||||
iv_label = 'Disable Parallel Processing'
|
||||
iv_hint = 'If disabled, abapGit will use only a single thread to serialize objects'
|
||||
)->start_group(
|
||||
iv_name = c_id-git_default_values
|
||||
iv_label = 'Git Default Values'
|
||||
)->text(
|
||||
iv_name = c_id-default_git_uname
|
||||
iv_label = 'Default User'
|
||||
)->text(
|
||||
iv_name = c_id-default_git_email
|
||||
iv_label = 'Default Email'
|
||||
)->command(
|
||||
iv_label = 'Save Settings'
|
||||
iv_cmd_type = zif_abapgit_html_form=>c_cmd_type-input_main
|
||||
|
@ -248,6 +260,14 @@ CLASS zcl_abapgit_gui_page_sett_pers IMPLEMENTATION.
|
|||
iv_key = c_id-parallel_proc_disabled
|
||||
iv_val = boolc( ms_settings-parallel_proc_disabled = abap_true ) ) ##TYPE.
|
||||
|
||||
" Git Default Values
|
||||
ro_form_data->set(
|
||||
iv_key = c_id-default_git_uname
|
||||
iv_val = |{ ms_settings-default_git_uname }| ).
|
||||
ro_form_data->set(
|
||||
iv_key = c_id-default_git_email
|
||||
iv_val = |{ ms_settings-default_git_email }| ).
|
||||
|
||||
ENDMETHOD.
|
||||
|
||||
|
||||
|
@ -336,6 +356,10 @@ CLASS zcl_abapgit_gui_page_sett_pers IMPLEMENTATION.
|
|||
" Resources
|
||||
ms_settings-parallel_proc_disabled = mo_form_data->get( c_id-parallel_proc_disabled ).
|
||||
|
||||
" Git Default Values
|
||||
ms_settings-default_git_uname = mo_form_data->get( c_id-default_git_uname ).
|
||||
ms_settings-default_git_email = mo_form_data->get( c_id-default_git_email ).
|
||||
|
||||
" Store in DB
|
||||
mo_settings->set_user_settings( ms_settings ).
|
||||
|
||||
|
|
|
@ -232,6 +232,8 @@ INTERFACE zif_abapgit_definitions
|
|||
hide_sapgui_hint TYPE abap_bool,
|
||||
activate_wo_popup TYPE abap_bool,
|
||||
label_colors TYPE string,
|
||||
default_git_uname TYPE string,
|
||||
default_git_email TYPE string,
|
||||
END OF ty_s_user_settings .
|
||||
TYPES:
|
||||
BEGIN OF ty_list_settings,
|
||||
|
|
Loading…
Reference in New Issue
Block a user