diff --git a/harbour/ChangeLog.txt b/harbour/ChangeLog.txt index 965589c44a..1a1af750ef 100644 --- a/harbour/ChangeLog.txt +++ b/harbour/ChangeLog.txt @@ -10,6 +10,13 @@ * Change, ! Fix, % Optimization, + Addition, - Removal, ; Comment */ +2012-11-28 17:38 UTC+0100 Viktor Szakats (harbour syenar.net) + * src/rtl/devoutp.prg + + DEVOUTPICT() to support timestampe type + + * contrib/hbnf/tests/datecnfg.prg + * timestamp type + 2012-11-28 17:28 UTC+0100 Viktor Szakats (harbour syenar.net) + contrib/xhb/xhbmisc.prg * contrib/xhb/xhb.hbp diff --git a/harbour/contrib/hbnf/tests/datecnfg.prg b/harbour/contrib/hbnf/tests/datecnfg.prg index bb9b6b4e02..47772cc7df 100644 --- a/harbour/contrib/hbnf/tests/datecnfg.prg +++ b/harbour/contrib/hbnf/tests/datecnfg.prg @@ -156,7 +156,7 @@ STATIC FUNCTION FT_CAL( dGivenDate, nType ) aTemp := ft_DateCnfg() cFY_Start := aTemp[ 1 ] - IF dGivenDate == NIL .OR. !( ValType( dGivenDate ) $ "ND" ) + IF dGivenDate == NIL .OR. !( ValType( dGivenDate ) $ "NDT" ) dGivenDate := Date() ELSEIF HB_ISNUMERIC( dGivenDate ) nType := dGivenDate diff --git a/harbour/src/rtl/devoutp.prg b/harbour/src/rtl/devoutp.prg index 57e4164dc4..1f09eb5750 100644 --- a/harbour/src/rtl/devoutp.prg +++ b/harbour/src/rtl/devoutp.prg @@ -52,7 +52,7 @@ PROCEDURE DevOutPict( xValue, cPicture, cColor ) - IF ValType( xValue ) $ "CMNDL" + IF ValType( xValue ) $ "CMNDTL" DevOut( Transform( xValue, cPicture ), cColor ) ENDIF