diff options
author | Joey Hess <joey@kitenet.net> | 2012-03-13 11:49:29 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-03-13 11:50:39 -0400 |
commit | f0733e6b9650e518edbc635b7fdb22b44155732d (patch) | |
tree | 89fad2ea5357c93f166aab079cc80a215b21df11 /IkiWiki/Plugin/darcs.pm | |
parent | d903f2c2fa337c28ef1369caa606dd012100ad4e (diff) | |
download | ikiwiki-f0733e6b9650e518edbc635b7fdb22b44155732d.tar ikiwiki-f0733e6b9650e518edbc635b7fdb22b44155732d.tar.gz |
URI escape filename when generating the diffurl.
ikiwiki source files can contain at least one character that
needs to be escaped in an url: +
Diffstat (limited to 'IkiWiki/Plugin/darcs.pm')
-rw-r--r-- | IkiWiki/Plugin/darcs.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/IkiWiki/Plugin/darcs.pm b/IkiWiki/Plugin/darcs.pm index 1313041e7..646f65df1 100644 --- a/IkiWiki/Plugin/darcs.pm +++ b/IkiWiki/Plugin/darcs.pm @@ -3,6 +3,7 @@ package IkiWiki::Plugin::darcs; use warnings; use strict; +use URI::Escape q{uri_escape_utf8}; use IkiWiki; sub import { @@ -336,7 +337,8 @@ sub rcs_recentchanges ($) { foreach my $f (@files) { my $d = defined $config{'diffurl'} ? $config{'diffurl'} : ""; - $d =~ s/\[\[file\]\]/$f/go; + my $ef = uri_escape_utf8($f); + $d =~ s/\[\[file\]\]/$ef/go; $d =~ s/\[\[hash\]\]/$hash/go; push @pg, { |