diff --git a/src/git/zcl_abapgit_git_porcelain.clas.abap b/src/git/zcl_abapgit_git_porcelain.clas.abap
index 26431f2d0..d4c8366df 100644
--- a/src/git/zcl_abapgit_git_porcelain.clas.abap
+++ b/src/git/zcl_abapgit_git_porcelain.clas.abap
@@ -728,7 +728,7 @@ CLASS ZCL_ABAPGIT_GIT_PORCELAIN IMPLEMENTATION.
 
 
     READ TABLE it_objects INTO ls_object
-      WITH key type COMPONENTS
+      WITH KEY type COMPONENTS
         type = zif_abapgit_definitions=>gc_type-tree
         sha1 = iv_tree.
     IF sy-subrc <> 0.
diff --git a/src/zabapgit_forms.prog.abap b/src/zabapgit_forms.prog.abap
index 2d0e57569..af1a023ba 100644
--- a/src/zabapgit_forms.prog.abap
+++ b/src/zabapgit_forms.prog.abap
@@ -129,7 +129,7 @@ FORM output.
   TRY.
       zcl_abapgit_gui=>get_instance( )->focus( ).
     CATCH zcx_abapgit_exception INTO lx_error.
-      message lx_error type 'S' DISPLAY LIKE 'E'.
+      MESSAGE lx_error TYPE 'S' DISPLAY LIKE 'E'.
   ENDTRY.
 ENDFORM.