diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 6bbe3f36b7..99063e04ef 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,13 @@
    2009-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org)
 */
 
+2009-03-04 19:34 UTC+0100 Viktor Szakats (harbour.01 syenar hu)
+  * source/compiler/ppcomp.c
+    ! #pragma -k? options are now case-insensitive like all
+      other Harbour options.
+      This completes this change:
+      2008-08-06 22:18 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
+
 2009-03-04 18:42 UTC+0100 Viktor Szakats (harbour.01 syenar hu)
   * utils/hbmk2/hbmk2.prg
     + Added warning msg if referenced .hbm file cannot be found.
diff --git a/harbour/source/compiler/ppcomp.c b/harbour/source/compiler/ppcomp.c
index d34d654181..0bf442dacc 100644
--- a/harbour/source/compiler/ppcomp.c
+++ b/harbour/source/compiler/ppcomp.c
@@ -201,35 +201,44 @@ static BOOL hb_pp_CompilerSwitch( void * cargo, const char * szSwitch,
          switch( szSwitch[ 1 ] )
          {
             case 'c':
+            case 'C':
                /* clear all flags - minimal set of features */
                HB_COMP_PARAM->supported &= HB_COMPFLAG_SHORTCUTS;
                HB_COMP_PARAM->supported |= HB_COMPFLAG_OPTJUMP |
                                            HB_COMPFLAG_MACROTEXT;
                break;
             case 'h':
+            case 'H':
                iFlag = HB_COMPFLAG_HARBOUR;
                break;
             case 'o':
+            case 'O':
                iFlag = HB_COMPFLAG_EXTOPT;
                break;
             case 'i':
+            case 'I':
                iFlag = HB_COMPFLAG_HB_INLINE;
                break;
             case 'r':
+            case 'R':
                iFlag = HB_COMPFLAG_RT_MACRO;
                break;
             case 'x':
+            case 'X':
                iFlag = HB_COMPFLAG_XBASE;
                break;
+            case 'j':
             case 'J':
                iFlag = HB_COMPFLAG_OPTJUMP;
                iValue = !iValue;
                break;
+            case 'm':
             case 'M':
                iFlag = HB_COMPFLAG_MACROTEXT;
                iValue = !iValue;
                break;
             case 's':
+            case 'S':
                iFlag = HB_COMPFLAG_ARRSTR;
                break;
             default: