From c8306c98c670199a94e4f84b6147c5d858c47902 Mon Sep 17 00:00:00 2001 From: Julien Moutinho Date: Mon, 21 Apr 2014 17:10:24 +0200 Subject: [PATCH] fix wrong / before $tag --- events.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/events.pm b/events.pm index e892d10..c072df6 100644 --- a/events.pm +++ b/events.pm @@ -202,7 +202,8 @@ sub event_of_page ($%) { (keys %{$IkiWiki::typedlinks{$event}{tag}})); @tags = map { - my $tag = $_; + my $besttag = bestlink($params{page}, $_); + my $tag = (length $besttag > 0 ? $besttag : $_); my $title = exists $pagestate{$tag}{meta}{title} ? $pagestate{$tag}{meta}{title} @@ -211,7 +212,7 @@ sub event_of_page ($%) { = htmllink ( $params{page} , $params{destpage} - , '/'.$tag + , (length $besttag == 0 and defined $config{tag_new} ? $config{tag_new} : '').'/'.$tag , linktext => $title , noimageinline => 1 , title => $title ); -- 2.20.1