From 9a184badf5a42f4d6bd6d5a8dc0d2c2bbcabde72 Mon Sep 17 00:00:00 2001 From: Simon McVittie Date: Sat, 12 Jul 2008 17:34:40 +0100 Subject: [PATCH] Stop prepending urn:uuid: to guids that look like UUIDs --- IkiWiki/Plugin/meta.pm | 8 +------- 1 file changed, 1 insertion(+), 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') { -- 2.44.0