fix DateTime.Date (RT #114758)'