сдвиг даты

Александр 04.01.2010 23:01 / 04.01.2010 23:02

$dDate[^date::now[]]
^dDate.sql-string[]<br> ^rem{2010-01-05 00:59:36}

^dDate.roll[TZ;GMT]
^dDate.sql-string[]<br> ^rem{2010-01-04 19:59:36}

$dDateNew[^date::create[^dDate.sql-string[]]]
$dDate[^date::create($dDate+1/24)]
^dDate.sql-string[]<br> ^rem{2010-01-05 01:59:36, правильно ли я ожидаю тут тоже получить 2010-01-04 20:59:36?}

$dDateNew[^date::create($dDateNew+1/24)]
^dDateNew.sql-string[]  ^rem{2010-01-04 20:59:36}