diff options
| author | Joey Hess <joey@kodama.kitenet.net> | 2008-02-20 16:45:02 -0500 |
|---|---|---|
| committer | Joey Hess <joey@kodama.kitenet.net> | 2008-02-20 16:45:02 -0500 |
| commit | a59af82bb85a037814d3f95d3c9841048b221ca0 (patch) | |
| tree | 132a15eaafabc5f6c916600c28259b3918da47f6 /IkiWiki/Rcs | |
| parent | a4697df3e79780f472eee75681d208d7013cbb33 (diff) | |
* tla: Remove call to escapeHTML when constructing recentchanges message;
the html is escaped at a different level. Closes: #466495
* bzr, mercurial: Remove unused import of escapeHTML.
Diffstat (limited to 'IkiWiki/Rcs')
| -rw-r--r-- | IkiWiki/Rcs/bzr.pm | 3 | ||||
| -rw-r--r-- | IkiWiki/Rcs/mercurial.pm | 3 | ||||
| -rw-r--r-- | IkiWiki/Rcs/tla.pm | 2 |
3 files changed, 1 insertions, 7 deletions
diff --git a/IkiWiki/Rcs/bzr.pm b/IkiWiki/Rcs/bzr.pm index a04bfe1cb..526036bf3 100644 --- a/IkiWiki/Rcs/bzr.pm +++ b/IkiWiki/Rcs/bzr.pm @@ -92,9 +92,6 @@ sub rcs_add ($) { # {{{ sub rcs_recentchanges ($) { #{{{ my ($num) = @_; - eval q{use CGI 'escapeHTML'}; - error($@) if $@; - my @cmdline = ("bzr", "log", "-v", "--show-ids", "--limit", $num, $config{srcdir}); open (my $out, "@cmdline |"); diff --git a/IkiWiki/Rcs/mercurial.pm b/IkiWiki/Rcs/mercurial.pm index db6a396ac..8b1f2c6a1 100644 --- a/IkiWiki/Rcs/mercurial.pm +++ b/IkiWiki/Rcs/mercurial.pm @@ -104,9 +104,6 @@ sub rcs_add ($) { # {{{ sub rcs_recentchanges ($) { #{{{ my ($num) = @_; - eval q{use CGI 'escapeHTML'}; - error($@) if $@; - my @cmdline = ("hg", "-R", $config{srcdir}, "log", "-v", "-l", $num, "--style", "default"); open (my $out, "@cmdline |"); diff --git a/IkiWiki/Rcs/tla.pm b/IkiWiki/Rcs/tla.pm index ecc561bde..231496445 100644 --- a/IkiWiki/Rcs/tla.pm +++ b/IkiWiki/Rcs/tla.pm @@ -132,7 +132,7 @@ sub rcs_recentchanges ($) { } my @message; - push @message, { line => escapeHTML($summ) }; + push @message, { line => $summ }; my @pages; |