SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-05-01 12:20:51 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Merge pull request #1159 from larshp/issue_1141

Browse Source 
activate new CLAS deserialization #1141
This commit is contained in:
Lars Hvam 2018-01-21 07:11:28 +01:00 committed by GitHub
commit 95780d1923
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
3 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/zabapgit_object_clas.prog.abap
View File

@ -7,7 +7,7 @@
*----------------------------------------------------------------------* *----------------------------------------------------------------------*
* *
*----------------------------------------------------------------------* *----------------------------------------------------------------------*
CLASS lcl_object_clas DEFINITION INHERITING FROM lcl_objects_program. CLASS lcl_object_clas_old DEFINITION INHERITING FROM lcl_objects_program.
PUBLIC SECTION. PUBLIC SECTION.
INTERFACES zif_abapgit_object. INTERFACES zif_abapgit_object.
@ -47,7 +47,7 @@ ENDCLASS. "lcl_object_dtel DEFINITION
*----------------------------------------------------------------------* *----------------------------------------------------------------------*
* *
*----------------------------------------------------------------------* *----------------------------------------------------------------------*
CLASS lcl_object_clas IMPLEMENTATION. CLASS lcl_object_clas_old IMPLEMENTATION.
METHOD zif_abapgit_object~has_changed_since. METHOD zif_abapgit_object~has_changed_since.
DATA: DATA:

4
src/zabapgit_object_clas_new.prog.abap
View File

@ -396,7 +396,7 @@ CLASS lcl_oo_class_new IMPLEMENTATION.
ENDCLASS. ENDCLASS.
CLASS lcl_object_clas_new DEFINITION INHERITING FROM lcl_object_clas. CLASS lcl_object_clas DEFINITION INHERITING FROM lcl_object_clas_old.
PUBLIC SECTION. PUBLIC SECTION.
METHODS: constructor METHODS: constructor
@ -410,7 +410,7 @@ CLASS lcl_object_clas_new DEFINITION INHERITING FROM lcl_object_clas.
ENDCLASS. ENDCLASS.
CLASS lcl_object_clas_new IMPLEMENTATION. CLASS lcl_object_clas IMPLEMENTATION.
METHOD constructor. METHOD constructor.
super->constructor( is_item = is_item super->constructor( is_item = is_item

8
src/zabapgit_objects_impl.prog.abap
View File

@ -146,10 +146,10 @@ CLASS lcl_objects IMPLEMENTATION.
lv_class_name = class_name( is_item ). lv_class_name = class_name( is_item ).
ENDIF. ENDIF.
IF zcl_abapgit_persist_settings=>get_instance( )->read( )->get_experimental_features( ) = abap_true * IF zcl_abapgit_persist_settings=>get_instance( )->read( )->get_experimental_features( ) = abap_true
AND is_item-obj_type = 'CLAS'. * AND is_item-obj_type = 'CLAS'.
lv_class_name = 'LCL_OBJECT_CLAS_NEW'. * lv_class_name = 'LCL_OBJECT_CLAS_NEW'.
ENDIF. * ENDIF.
TRY. TRY.
CREATE OBJECT ri_obj TYPE (lv_class_name) CREATE OBJECT ri_obj TYPE (lv_class_name)