From af93a489db35f480e2bcd70a0356e49e96d3d29c Mon Sep 17 00:00:00 2001 From: larshp Date: Thu, 3 Aug 2017 15:29:34 +0000 Subject: [PATCH] downport to 702, #878 --- src/zabapgit_http.prog.abap | 7 +++++-- src/zabapgit_unit_test.prog.abap | 9 ++++----- 2 files changed, 9 insertions(+), 7 deletions(-) diff --git a/src/zabapgit_http.prog.abap b/src/zabapgit_http.prog.abap index acfad0299..47176c60a 100644 --- a/src/zabapgit_http.prog.abap +++ b/src/zabapgit_http.prog.abap @@ -501,8 +501,8 @@ CLASS lcl_http IMPLEMENTATION. METHOD is_local_system. DATA: lv_host TYPE string, - lt_list TYPE lif_defs=>ty_icm_sinfo2_tt. - + lt_list TYPE lif_defs=>ty_icm_sinfo2_tt, + li_exit TYPE ref to lif_exit. CALL FUNCTION 'ICM_GET_INFO2' TABLES @@ -516,6 +516,9 @@ CLASS lcl_http IMPLEMENTATION. RETURN. ENDIF. + li_exit = lcl_exit=>get_instance( ). + li_exit->change_local_host( CHANGING ct_hosts = lt_list ). + lcl_exit=>get_instance( )->change_local_host( CHANGING ct_hosts = lt_list ). FIND REGEX 'https?://([^/^:]*)' IN iv_url diff --git a/src/zabapgit_unit_test.prog.abap b/src/zabapgit_unit_test.prog.abap index ce1075277..8d743b21a 100644 --- a/src/zabapgit_unit_test.prog.abap +++ b/src/zabapgit_unit_test.prog.abap @@ -2037,11 +2037,10 @@ CLASS ltcl_html_action_utils IMPLEMENTATION. METHOD _hex_to_char. - cl_abap_conv_in_ce=>create( )->convert( - EXPORTING - input = i_x - IMPORTING - data = r_s ). + DATA lr_conv TYPE REF TO cl_abap_conv_in_ce. + + lr_conv = cl_abap_conv_in_ce=>create( ). + lr_conv->convert( EXPORTING input = i_x IMPORTING data = r_s ). ENDMETHOD.