Re: Bug in DateTime::Format::ICal parse_recurrence?

On Mon, Mar 10, 2008 at 07:42:21PM +0000, me said:
> I'm guessing it's the mismatch between the precision of the UNTIL and 
> the $start - should something (either DateTime::Format::ICal, 
> DateTime::Event::ICal or my code) truncate the $start to the same 
> precision as the UNTIL?

So, adding this bit of code to the recur() method of 
DateTime::Event::ICal

   # dtstart / dtend / until
   if ($args{until}) {
        foreach my $meth (qw(second minute hour day month year)) {
            next unless $args{until}->$meth;
            foreach my $what (qw(dtstart dtend)) {
                $args{$what} = $args{$what}->truncate( to => $meth )
                    if exists $args{$what};
            }
            last;
        }
    }


gets the expected 5th result but I'm actually thing that it's the wrong 
way round and that the right answer is either

a) Tell people "Don't do that"

b) Work out what the highest precision is out of dtstart and until is  
and if dtstart is the highest make until be 

	+= $highest_precision_unit - 1;

so in this case silently rewrite until from 

	20080331

to

	20080331T23:59:59

I'm not sure what to do with dtend - probably the same?


Simon