fix meta date

[ikiwiki/events.git] / events.pm

diff --git a/events.pm b/events.pm
index dd1ed3e..ff3a539 100644 (file)
--- a/events.pm
+++ b/events.pm
@@ -22,6 +22,7 @@ use warnings;
 use IkiWiki 3.00;
 use Time::Local;
 use DateTime;
+use CGI::FormBuilder;
 #use Data::Dumper;
 
 sub import {
@@ -206,7 +207,7 @@ sub event_of_page ($%) {
                 = htmllink
                 ( $params{page}
                 , $params{destpage}
-                , $tag
+                , '/'.$tag
                 , linktext => $title
                 , noimageinline => 1
                 , title => $title );
@@ -337,7 +338,7 @@ sub event_html ($$%) {
                                         ?(month => $month):())
                                 , (($date->year() or $date->month() or $date->day())
                                         ?(year => $date->year()):())
-                                , do    => 'events'
+                                , do    => 'newevent'
                                 , page  => $params{destpage}
                                 )
                         . qq{' rel='nofollow'>+</a>};
@@ -571,7 +572,7 @@ sub preprocess (@) {
 # new
 sub tmpl ($$) {
        my ($base, $model) = @_;
-       my $page = IkiWiki::dirname($base).'/'.'templates/'.$model;
+       my $page = $base.'/'.'templates/'.$model;
        my $file = defined srcfile($page, 1) ? '/'.$page : $model;
        return template($file);
  }