Skip Menu |

This queue is for tickets about the Date-Calc CPAN distribution.

Report information
The Basics
Id: 119163
Status: new
Priority: 0/
Queue: Date-Calc

People
Owner: Nobody in particular
Requestors: MORITZ [...] cpan.org
Cc: NNIS-4658 [...] jira.noris.de
AdminCc:

Bug Information
Severity: Important
Broken in: 6.4
Fixed in: (no value)



CC: NNIS-4658 [...] jira.noris.de
Subject: [PATCH] Reformation Day is a federal holiday in Germany in 2017
Dear maintainer, 2017-10-31 is a federal holiday in Germany due to the 500 year anniversary. Compare for example http://www.kalender-2017.net/reformationstag/ The attached patch implements this. It would be nice if you could apply this, and make a release before June 2017 or so. Thanks, Moritz
Subject: reformationstag-2017.patch
diff --git a/lib/Date/Calendar/Profiles.pm b/lib/Date/Calendar/Profiles.pm index 270b7bc..aefdaa5 100644 --- a/lib/Date/Calendar/Profiles.pm +++ b/lib/Date/Calendar/Profiles.pm @@ -231,7 +231,7 @@ $Profiles->{'DE'} = # Deutschland "MariƤ Himmelfahrt" => "#15.08.", "Erntedankfest" => "#1/Sun/Oct", "Ende d. Sommerzeit" => "#5/Sun/Oct", - "Reformationstag" => "#31.10.", + "Reformationstag" => \&DE_Reformationstags, "Allerheiligen" => "#01.11.", "Allerseelen" => "#02.11.", "Martinstag" => "#11.11.", @@ -372,6 +372,13 @@ sub DE_Buss_und_Bettag2 { return( &DE_Buss_und_Bettag(@_), '#' ); } +sub DE_Reformationstags +{ + my $year = shift; + # a regular, federal holiday in 2017, otherwise commemorative + return (2017,10,31) if $year == 2017; + return ($year,10,31,'#'); +} sub DE_Volkstrauertag { my($year,$label) = @_;