aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/Data/ICal
diff options
context:
space:
mode:
Diffstat (limited to 'perllib/Data/ICal')
-rw-r--r--perllib/Data/ICal/Entry/Event7986.pm18
-rw-r--r--perllib/Data/ICal/RFC7986.pm17
2 files changed, 35 insertions, 0 deletions
diff --git a/perllib/Data/ICal/Entry/Event7986.pm b/perllib/Data/ICal/Entry/Event7986.pm
new file mode 100644
index 000000000..ae627861a
--- /dev/null
+++ b/perllib/Data/ICal/Entry/Event7986.pm
@@ -0,0 +1,18 @@
+package Data::ICal::Entry::Event7986;
+
+use parent 'Data::ICal::Entry::Event';
+
+sub optional_unique_properties {
+ return (
+ shift->SUPER::optional_unique_properties,
+ "color",
+ );
+}
+
+sub optional_repeatable_properties {
+ return (
+ shift->SUPER::optional_repeatable_properties,
+ "conference", "image",
+ );
+}
+
diff --git a/perllib/Data/ICal/RFC7986.pm b/perllib/Data/ICal/RFC7986.pm
new file mode 100644
index 000000000..01f9d354e
--- /dev/null
+++ b/perllib/Data/ICal/RFC7986.pm
@@ -0,0 +1,17 @@
+package Data::ICal::RFC7986;
+
+use parent 'Data::ICal';
+
+sub optional_unique_properties {
+ qw( calscale method
+ uid last-modified url refresh-interval source color
+ );
+}
+
+# name/description are only repeatable to provide
+# translations with language param
+sub optional_repeatable_properties {
+ qw( name description categories image );
+}
+
+1;