X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/f707d62481052a3cba1396a681f206d9e66f67ef..e8a945845bd0774c2280da53f8a976c48547ede4:/IkiWiki/Plugin/meta.pm diff --git a/IkiWiki/Plugin/meta.pm b/IkiWiki/Plugin/meta.pm index 55c214f67..8d444109f 100644 --- a/IkiWiki/Plugin/meta.pm +++ b/IkiWiki/Plugin/meta.pm @@ -9,11 +9,20 @@ use IkiWiki 2.00; my %metaheaders; sub import { #{{{ + hook(type => "getsetup", id => "meta", call => \&getsetup); hook(type => "needsbuild", id => "meta", call => \&needsbuild); hook(type => "preprocess", id => "meta", call => \&preprocess, scan => 1); hook(type => "pagetemplate", id => "meta", call => \&pagetemplate); } # }}} +sub getsetup () { #{{{ + return + plugin => { + safe => 1, + rebuild => undef, + }, +} #}}} + sub needsbuild (@) { #{{{ my $needsbuild=shift; foreach my $page (keys %pagestate) { @@ -85,13 +94,7 @@ sub preprocess (@) { #{{{ # fallthrough } elsif ($key eq 'guid') { - my $abs = $value; - - if ($abs =~ m/^[[:xdigit:]]{8}-[[:xdigit:]]{4}-[[:xdigit]]{4}-[[:xdigit:]]{4}-[[:xdigit:]]{12}$/) { - $abs = lc "urn:uuid:$abs"; - } - - $pagestate{$page}{meta}{guid}=HTML::Entities::encode_numeric($abs); + $pagestate{$page}{meta}{guid}=HTML::Entities::encode_numeric($value); # fallthrough } elsif ($key eq 'license') { @@ -144,7 +147,7 @@ sub preprocess (@) { #{{{ # editable page as a stylesheet my $stylesheet=bestlink($page, $value.".css"); if (! length $stylesheet) { - return "[[meta ".gettext("stylesheet not found")."]]"; + error gettext("stylesheet not found") } push @{$metaheaders{$page}}, '