diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index a0e9e2ddea..6cdc7eb48e 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,7 @@
+2000-05-07 23:30 CET Patrick Mast <harbour@PatrickMast.com>
+   * tests/testhtml.prg
+     * changed the Default() function into If(...)
+
 2000-06-16 22:10 GMT-3 Luiz Rafael Culik <culik@sl.conex.net>
    * utils/hbdoc/hbdoc.prg
      * Some small enhacements when generating the Windows HTML HELP project
diff --git a/harbour/tests/testhtml.prg b/harbour/tests/testhtml.prg
index 8aafc60d2b..02776ff989 100644
--- a/harbour/tests/testhtml.prg
+++ b/harbour/tests/testhtml.prg
@@ -118,7 +118,8 @@ STATIC FUNCTION AddPara( cPara, cAlign )
 
    LOCAL Self := QSelf()
 
-   Default( cAlign, "Left" )
+   //Default( cAlign, "Left" ) // removed Patrick Mast 2000-06-07
+   cAlign:=If(cAlign==NIL,"Left",cAlign) //Added Patrick Mast 2000-06-17
 
    ::cBody := ::cBody + ;
       "<P ALIGN='" + cAlign + "'>" + s_cNewLine + ;