diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index a337e7fe75..e45773e404 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,13 @@
    2008-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org)
 */
 
+2009-02-06 12:29 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
+  * harbour/source/common/hbprintf.c
+    * pacified warning
+
+  * harbour/source/rtl/philesx.c
+    ! fixed typo
+
 2009-02-06 11:52 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
   * harbour/source/rtl/hbproces.c
     * removed always false condition for #if expression
diff --git a/harbour/source/common/hbprintf.c b/harbour/source/common/hbprintf.c
index 244c56c155..d01fa4007d 100644
--- a/harbour/source/common/hbprintf.c
+++ b/harbour/source/common/hbprintf.c
@@ -486,7 +486,7 @@ static void va_arg_fill( v_paramlst * plst, va_list va )
 #ifdef _HB_WRAP_MODFL_
 _x_long_dbl _hb_modfl( _x_long_dbl x, _x_long_dbl * p )
 {
-   _x_double pd = *p;
+   _x_double pd;
    _x_long_dbl r = modf( x, &pd );
    *p = pd;
    return r;
diff --git a/harbour/source/rtl/philesx.c b/harbour/source/rtl/philesx.c
index c83f6ace5e..6e051b9298 100644
--- a/harbour/source/rtl/philesx.c
+++ b/harbour/source/rtl/philesx.c
@@ -63,7 +63,7 @@
 HB_FUNC( CURDRIVE )
 {
 #if defined(HB_OS_HAS_DRIVE_LETTER)
-   char szCurDrive[ 1 ], szDrive;
+   char szCurDrive[ 1 ], * szDrive;
 
    szCurDrive[ 0 ] = ( ( char ) hb_fsCurDrv() ) + 'A';
    hb_retclen( szCurDrive, 1 );