DateTime::Event::Sunrise altitude angle

[Joshua Hoblitt]

Hi Ron,

I need the ability to correct the altitude angle for height above sea level.
The validation regex for this value currently doesn't allow arbitrary floating
point values.  Could you change it to something like the patch below?

Cheers,

-J

--
Index: lib/DateTime/Event/Sunrise.pm
===================================================================
RCS file: 
/cvsroot/perl-date-time/modules/DateTime-Event-Sunrise/lib/DateTime/Event/Sunrise.pm,v
retrieving revision 1.22
diff -u -r1.22 Sunrise.pm
--- lib/DateTime/Event/Sunrise.pm       9 Jun 2004 20:05:06 -0000       1.22
+++ lib/DateTime/Event/Sunrise.pm       19 Oct 2004 21:50:56 -0000
@@ -28,7 +28,7 @@
           altitude  => {
               type    => SCALAR,
               default => '-0.833',
-              regex   => qr/^(0|-0.25|-0.583|-0.833|-6|-12|-15|-18)$/
+              regex   => qr/^(0|-\d+)$/
           },
           iteration => { type => SCALAR, default => '0' },
       }