diff options
| -rwxr-xr-x | bin/events2md.pl | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/bin/events2md.pl b/bin/events2md.pl index f9363f9..76c6398 100755 --- a/bin/events2md.pl +++ b/bin/events2md.pl @@ -8,6 +8,42 @@ use Feature::Compat::Try; use FindBin qw($Bin); use lib "$Bin/../lib"; +# add bogus properties acknowledged uid to silence Cal::DAV +package Data::ICal::Entry::Alarm::None { + use base qw/Data::ICal::Entry::Alarm/; + + sub optional_unique_properties + { + qw( + duration repeat acknowledged uid + ); + } +} + +# add bogus properties acknowledged uid to silence Cal::DAV +package Data::ICal::Entry::Alarm::Display { + use base qw/Data::ICal::Entry::Alarm/; + + sub optional_unique_properties + { + qw( + duration repeat acknowledged uid + ); + } +} + +# add bogus properties acknowledged uid to silence Cal::DAV +package Data::ICal::Entry::Alarm::Email { + use base qw/Data::ICal::Entry::Alarm/; + + sub optional_unique_properties + { + qw( + duration repeat acknowledged uid + ); + } +} + use Getopt::Complete ( 'quiet!' => undef, 'verbose!' => undef, |