X-Git-Url: https://git.stderr.nl/gitweb?p=matthijs%2Fupstream%2Fblosxom.git;a=blobdiff_plain;f=blosxom.cgi;h=674ff10f7a691e686b3d42cad6555ef2b76c3348;hp=ee9bebc03717f46c203afef2366d0926221fe88f;hb=eab8087160713565054c7dee8a4c788efd4dbda2;hpb=56351d2ec62f92e42f8f20024c2fd94d940f1f59 diff --git a/blosxom.cgi b/blosxom.cgi index ee9bebc..674ff10 100755 --- a/blosxom.cgi +++ b/blosxom.cgi @@ -144,6 +144,8 @@ my $fh = new FileHandle; # Use the stated preferred URL or figure it out automatically $url ||= url( -path_info => 1 ); +# Unescape %XX hex codes (from URI::Escape::uri_unescape) +$url =~ s/%([0-9A-Fa-f]{2})/chr(hex($1))/eg; $url =~ s/^included:/http:/ if $ENV{SERVER_PROTOCOL} eq 'INCLUDED'; # NOTE: Since v3.12, it looks as if CGI.pm misbehaves for SSIs and @@ -733,34 +735,31 @@ sub nice_date { __DATA__ html content_type text/html; charset=$blog_encoding +html head html head html head
-html head -html head -html head$path_info_da $path_info_mo $path_info_yr
+html head
-html story $title
-html story $body
-html story
-html story posted at: $ti | path: $path | permanent link to this entry
-html story
posted at: $ti | path: $path | permanent link to this entry
+html storyError: I'm afraid this is the first I've heard of a "$flavour" flavoured Blosxom. Try dropping the "/+$flavour" bit from the end of the URL.
+error headI'm afraid this is the first I've heard of a "$flavour" flavoured Blosxom. Try dropping the "/+$flavour" bit from the end of the URL.
+error story$title
-error story $body #