Default link_hint_key and background color

With this commit link_hint_key and link_hint_backgroun_dcolor
are populated with default values.
This commit is contained in:
Christian Guenter 2018-08-04 07:05:07 +00:00 committed by Lars Hvam
parent ff4d126856
commit 62506f52bb
4 changed files with 41 additions and 18 deletions

View File

@ -109,7 +109,7 @@ CLASS ZCL_ABAPGIT_GUI_PAGE IMPLEMENTATION.
lv_link_hint_key = lo_settings->get_link_hint_key( ). lv_link_hint_key = lo_settings->get_link_hint_key( ).
lv_background_color = lo_settings->get_link_hint_background_color( ). lv_background_color = lo_settings->get_link_hint_background_color( ).
IF lo_settings->get_link_hints( ) = abap_true IF lo_settings->get_link_hints_enabled( ) = abap_true
AND lv_link_hint_key IS NOT INITIAL. AND lv_link_hint_key IS NOT INITIAL.
ro_html->add( |setLinkHints("{ lv_link_hint_key }","{ lv_background_color }");| ). ro_html->add( |setLinkHints("{ lv_link_hint_key }","{ lv_background_color }");| ).
ro_html->add( |setInitialFocusWithQuerySelector('a span', true);| ). ro_html->add( |setInitialFocusWithQuerySelector('a span', true);| ).

View File

@ -133,11 +133,11 @@ CLASS zcl_abapgit_gui_page_settings IMPLEMENTATION.
mo_settings->set_adt_jump_enanbled( abap_false ). mo_settings->set_adt_jump_enanbled( abap_false ).
ENDIF. ENDIF.
READ TABLE it_post_fields ASSIGNING <ls_post_field> WITH KEY name = 'link_hints'. READ TABLE it_post_fields ASSIGNING <ls_post_field> WITH KEY name = 'link_hints_enabled'.
IF sy-subrc = 0. IF sy-subrc = 0.
mo_settings->set_link_hints( abap_true ). mo_settings->set_link_hints_enabled( abap_true ).
ELSE. ELSE.
mo_settings->set_link_hints( abap_false ). mo_settings->set_link_hints_enabled( abap_false ).
ENDIF. ENDIF.
READ TABLE it_post_fields ASSIGNING <ls_post_field> WITH KEY name = 'link_hint_key'. READ TABLE it_post_fields ASSIGNING <ls_post_field> WITH KEY name = 'link_hint_key'.
@ -435,7 +435,7 @@ CLASS zcl_abapgit_gui_page_settings IMPLEMENTATION.
lv_link_hint_key TYPE char01, lv_link_hint_key TYPE char01,
lv_link_background_color TYPE string. lv_link_background_color TYPE string.
IF mo_settings->get_link_hints( ) = abap_true. IF mo_settings->get_link_hints_enabled( ) = abap_true.
lv_checked = 'checked'. lv_checked = 'checked'.
ENDIF. ENDIF.
@ -444,7 +444,7 @@ CLASS zcl_abapgit_gui_page_settings IMPLEMENTATION.
CREATE OBJECT ro_html. CREATE OBJECT ro_html.
ro_html->add( |<h2>Vimium like link hints</h2>| ). ro_html->add( |<h2>Vimium like link hints</h2>| ).
ro_html->add( `<input type="checkbox" name="link_hints" value="X" ` ro_html->add( `<input type="checkbox" name="link_hints_enabled" value="X" `
&& lv_checked && ` > Enable Vimium like link hints` ). && lv_checked && ` > Enable Vimium like link hints` ).
ro_html->add( |<br>| ). ro_html->add( |<br>| ).
ro_html->add( |<br>| ). ro_html->add( |<br>| ).
@ -454,7 +454,7 @@ CLASS zcl_abapgit_gui_page_settings IMPLEMENTATION.
ro_html->add( |<br>| ). ro_html->add( |<br>| ).
ro_html->add( |<input type="text" name="link_hint_background_color" size="20" maxlength="20"| ro_html->add( |<input type="text" name="link_hint_background_color" size="20" maxlength="20"|
&& | value="{ lv_link_background_color }"| && | value="{ lv_link_background_color }"|
&& |> Background Color| ). && |> Background Color (HTML colors e.g. lightgreen or #42f47a)| ).
ro_html->add( |<br>| ). ro_html->add( |<br>| ).
ro_html->add( |<br>| ). ro_html->add( |<br>| ).

View File

@ -83,12 +83,12 @@ CLASS zcl_abapgit_settings DEFINITION PUBLIC CREATE PUBLIC.
set_show_default_repo set_show_default_repo
IMPORTING IMPORTING
iv_show_default_repo TYPE abap_bool, iv_show_default_repo TYPE abap_bool,
set_link_hints set_link_hints_enabled
IMPORTING IMPORTING
iv_link_hints TYPE abap_bool, iv_link_hints_enabled TYPE abap_bool,
get_link_hints get_link_hints_enabled
RETURNING RETURNING
VALUE(rv_link_hints) TYPE abap_bool VALUE(rv_link_hints_enabled) TYPE abap_bool
RAISING RAISING
zcx_abapgit_exception, zcx_abapgit_exception,
set_link_hint_key set_link_hint_key
@ -116,9 +116,14 @@ CLASS zcl_abapgit_settings DEFINITION PUBLIC CREATE PUBLIC.
commitmsg_comment_length TYPE i, commitmsg_comment_length TYPE i,
commitmsg_body_size TYPE i, commitmsg_body_size TYPE i,
END OF ty_s_settings. END OF ty_s_settings.
DATA: ms_settings TYPE ty_s_settings, DATA: ms_settings TYPE ty_s_settings,
ms_user_settings TYPE zif_abapgit_definitions=>ty_s_user_settings. ms_user_settings TYPE zif_abapgit_definitions=>ty_s_user_settings.
METHODS:
set_default_link_hint_key,
set_default_link_hint_bg_color.
ENDCLASS. ENDCLASS.
@ -146,8 +151,8 @@ CLASS zcl_abapgit_settings IMPLEMENTATION.
ENDMETHOD. ENDMETHOD.
METHOD get_link_hints. METHOD get_link_hints_enabled.
rv_link_hints = ms_user_settings-link_hints. rv_link_hints_enabled = ms_user_settings-link_hints_enabled.
ENDMETHOD. ENDMETHOD.
@ -233,19 +238,29 @@ CLASS zcl_abapgit_settings IMPLEMENTATION.
set_show_default_repo( abap_false ). set_show_default_repo( abap_false ).
set_commitmsg_comment_length( c_commitmsg_comment_length_dft ). set_commitmsg_comment_length( c_commitmsg_comment_length_dft ).
set_commitmsg_body_size( c_commitmsg_body_size_dft ). set_commitmsg_body_size( c_commitmsg_body_size_dft ).
set_link_hint_key( |f| ). set_default_link_hint_key( ).
set_link_hint_background_color( |yellow| ). set_default_link_hint_bg_color( ).
ENDMETHOD. ENDMETHOD.
METHOD set_default_link_hint_bg_color.
set_link_hint_background_color( |lightgreen| ).
ENDMETHOD.
METHOD set_default_link_hint_key.
set_link_hint_key( |f| ).
ENDMETHOD.
METHOD set_experimental_features. METHOD set_experimental_features.
ms_settings-experimental_features = iv_run. ms_settings-experimental_features = iv_run.
ENDMETHOD. ENDMETHOD.
METHOD set_link_hints. METHOD set_link_hints_enabled.
ms_user_settings-link_hints = iv_link_hints. ms_user_settings-link_hints_enabled = iv_link_hints_enabled.
ENDMETHOD. ENDMETHOD.
@ -286,6 +301,14 @@ CLASS zcl_abapgit_settings IMPLEMENTATION.
METHOD set_user_settings. METHOD set_user_settings.
ms_user_settings = is_user_settings. ms_user_settings = is_user_settings.
IF ms_user_settings-link_hint_key IS INITIAL.
set_default_link_hint_key( ).
ENDIF.
IF ms_user_settings-link_hint_background_color IS INITIAL.
set_default_link_hint_bg_color( ).
ENDIF.
ENDMETHOD. ENDMETHOD.

View File

@ -327,7 +327,7 @@ INTERFACE zif_abapgit_definitions PUBLIC.
max_lines TYPE i, max_lines TYPE i,
adt_jump_enabled TYPE abap_bool, adt_jump_enabled TYPE abap_bool,
show_default_repo TYPE abap_bool, show_default_repo TYPE abap_bool,
link_hints TYPE abap_bool, link_hints_enabled TYPE abap_bool,
link_hint_key TYPE char01, link_hint_key TYPE char01,
link_hint_background_color TYPE string, link_hint_background_color TYPE string,
END OF ty_s_user_settings. END OF ty_s_user_settings.