Bug#577950: Can't calculate 2 business days after 15 Apr 2010 17:12

[Damyan Ivanov]

Package: libdate-manip-perl
Version: 6.07-1
Severity: grave
Tags: upstream squeeze sid


I really don't thing we should release with this bug. It may break whatever 
software uses Date::Manip in an unpredictable way.


The following simple scripts fails:

=================================================
#!/usr/bin/perl

use strict;
use warnings;

use Date::Manip;

Date_Init(
    "DateFormat=non-US",
    'WorkDayBeg=09:00',
    'WorkDayEnd=17:30',
);

my $err;
my $d = DateCalc( '15.04.2010 17:12', '+ 2 days', \$err, 2 );

print "($err)\n" if $err;

print $d ? UnixDate($d, '%d.%m.%Y %T') : "Calculation failed\n";
=================================================

Expected output is '19.04.2010 17:12'.


I am trying to produce a patch. Help is welcome.


-- System Information:
Debian Release: squeeze/sid
  APT prefers oldstable
  APT policy: (500, 'oldstable'), (500, 'unstable'), (500, 'testing'), (500, 'stable'), (450, 'experimental')
Architecture: amd64 (x86_64)

Kernel: Linux 2.6.33-2-amd64 (SMP w/4 CPU cores)
Locale: LANG=bg_BG.UTF-8, LC_CTYPE=bg_BG.UTF-8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/dash

Versions of packages libdate-manip-perl depends on:
ii  libyaml-syck-perl             1.07-1     fast, lightweight YAML loader and 
ii  perl                          5.10.1-12  Larry Wall's Practical Extraction 

libdate-manip-perl recommends no packages.

libdate-manip-perl suggests no packages.

-- no debconf information