/usr/local/lib/perl/5.6.1/DateTime.pm:    if ( $self->{tz}->is_floating xor $was_floating )