diff --git a/calendar-import.plx b/calendar-import.plx
index d1da138..651aee4 100644
--- a/calendar-import.plx
+++ b/calendar-import.plx
@@ -136,7 +136,7 @@ my $LOCK_CLEANUP_CODE = sub {
   sub DieLog ($;$) {
     DoLog("die", undef, $_[0], $_[1]);
   }
-  sub WarnLog ($$) {
+  sub WarnLog ($;$) {
     DoLog("warn", $_[0], $_[1]);
   }
 }