diff options
author | Simon McVittie <http://smcv.pseudorandom.co.uk/> | 2008-07-12 17:34:40 +0100 |
---|---|---|
committer | Simon McVittie <http://smcv.pseudorandom.co.uk/> | 2008-07-12 17:34:40 +0100 |
commit | 9a184badf5a42f4d6bd6d5a8dc0d2c2bbcabde72 (patch) | |
tree | 31699ac365e64f979278b49e06229914b44e8389 | |
parent | b269835a7fa07c2bf5d469399324b7d2a8a8fbb1 (diff) | |
download | ikiwiki-9a184badf5a42f4d6bd6d5a8dc0d2c2bbcabde72.tar ikiwiki-9a184badf5a42f4d6bd6d5a8dc0d2c2bbcabde72.tar.gz |
Stop prepending urn:uuid: to guids that look like UUIDs
-rw-r--r-- | IkiWiki/Plugin/meta.pm | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/IkiWiki/Plugin/meta.pm b/IkiWiki/Plugin/meta.pm index 55c214f67..d00b6854f 100644 --- a/IkiWiki/Plugin/meta.pm +++ b/IkiWiki/Plugin/meta.pm @@ -85,13 +85,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') { |