From b48f79c4aded8303516f6bd122c05d0e6ad80db7 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Christian=20G=C3=BCnter?= Date: Wed, 15 Nov 2017 19:52:59 +0000 Subject: [PATCH] remove lcl_url --- src/zabapgit_util.prog.abap | 71 ----------------------------------- src/zcl_abapgit_url.clas.abap | 1 + 2 files changed, 1 insertion(+), 71 deletions(-) diff --git a/src/zabapgit_util.prog.abap b/src/zabapgit_util.prog.abap index 54a8b7cf8..2ccea827c 100644 --- a/src/zabapgit_util.prog.abap +++ b/src/zabapgit_util.prog.abap @@ -491,77 +491,6 @@ CLASS lcl_path IMPLEMENTATION. ENDCLASS. "lcl_path -*----------------------------------------------------------------------* -* CLASS zcl_abapgit_url DEFINITION -*----------------------------------------------------------------------* -* -*----------------------------------------------------------------------* -CLASS zcl_abapgit_url DEFINITION FINAL. - - PUBLIC SECTION. - CLASS-METHODS host - IMPORTING iv_repo TYPE string - RETURNING VALUE(rv_host) TYPE string - RAISING zcx_abapgit_exception. - - CLASS-METHODS name - IMPORTING iv_repo TYPE string - RETURNING VALUE(rv_name) TYPE string - RAISING zcx_abapgit_exception. - - CLASS-METHODS path_name - IMPORTING iv_repo TYPE string - RETURNING VALUE(rv_path_name) TYPE string - RAISING zcx_abapgit_exception. - - PRIVATE SECTION. - CLASS-METHODS regex - IMPORTING iv_repo TYPE string - EXPORTING ev_host TYPE string - ev_path TYPE string - ev_name TYPE string - RAISING zcx_abapgit_exception. - -ENDCLASS. "lcl_repo DEFINITION - -*----------------------------------------------------------------------* -* CLASS zcl_abapgit_url IMPLEMENTATION -*----------------------------------------------------------------------* -* -*----------------------------------------------------------------------* -CLASS zcl_abapgit_url IMPLEMENTATION. - - METHOD host. - regex( EXPORTING iv_repo = iv_repo - IMPORTING ev_host = rv_host ). - ENDMETHOD. "host - - METHOD name. - regex( EXPORTING iv_repo = iv_repo - IMPORTING ev_name = rv_name ). - ENDMETHOD. "short_name - - METHOD path_name. - - DATA: lv_host TYPE string ##NEEDED. - - FIND REGEX '(.*://[^/]*)(.*)' IN iv_repo - SUBMATCHES lv_host rv_path_name. - - ENDMETHOD. "path_name - - METHOD regex. - - FIND REGEX '(.*://[^/]*)(.*/)([^\.]*)[\.git]?' IN iv_repo - SUBMATCHES ev_host ev_path ev_name. - IF sy-subrc <> 0. - zcx_abapgit_exception=>raise( 'Malformed URL' ). - ENDIF. - - ENDMETHOD. "url - -ENDCLASS. "lcl_repo IMPLEMENTATION - *----------------------------------------------------------------------* * CLASS lcl_diff DEFINITION *----------------------------------------------------------------------* diff --git a/src/zcl_abapgit_url.clas.abap b/src/zcl_abapgit_url.clas.abap index c75de293d..c3b027699 100644 --- a/src/zcl_abapgit_url.clas.abap +++ b/src/zcl_abapgit_url.clas.abap @@ -46,6 +46,7 @@ ENDCLASS. + CLASS zcl_abapgit_url IMPLEMENTATION.