From 8a08da09276f1b9fececce3b7d84bde67938cbab Mon Sep 17 00:00:00 2001
From: fox_two <>
Date: Mon, 4 Jun 2001 12:39:04 +0000
Subject: [PATCH] month(): bug fix

---
 selfforum-cgi/shared/Posting/_lib.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/selfforum-cgi/shared/Posting/_lib.pm b/selfforum-cgi/shared/Posting/_lib.pm
index 93409c7..fa9ca4b 100644
--- a/selfforum-cgi/shared/Posting/_lib.pm
+++ b/selfforum-cgi/shared/Posting/_lib.pm
@@ -733,7 +733,7 @@ sub month($) {
     my @month = (qw(Januar Februar), "M\303\244rz", qw(April Mai Juni Juli August September Oktober November Dezember));
                                      # ^^^^^^^^ - UTF8 #
 
-    return $month[$_[0]];
+    return $month[$_[0]-1];
 }
 
 # ====================================================
-- 
2.34.1