dépôts
/
ikiwiki
/
events.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
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 IkiWiki 3.00;
use Time::Local;
use DateTime;
+use CGI::FormBuilder;
#use Data::Dumper;
sub import {
#use Data::Dumper;
sub import {
@@
-206,7
+207,7
@@
sub event_of_page ($%) {
= htmllink
( $params{page}
, $params{destpage}
= htmllink
( $params{page}
, $params{destpage}
- , $tag
+ ,
'/'.
$tag
, linktext => $title
, noimageinline => 1
, title => $title );
, 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()):())
?(month => $month):())
, (($date->year() or $date->month() or $date->day())
?(year => $date->year()):())
- , do => '
events
'
+ , do => '
newevent
'
, page => $params{destpage}
)
. qq{' rel='nofollow'>+</a>};
, page => $params{destpage}
)
. qq{' rel='nofollow'>+</a>};
@@
-571,7
+572,7
@@
sub preprocess (@) {
# new
sub tmpl ($$) {
my ($base, $model) = @_;
# 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);
}
my $file = defined srcfile($page, 1) ? '/'.$page : $model;
return template($file);
}