summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xindex.cgi4
1 files changed, 2 insertions, 2 deletions
diff --git a/index.cgi b/index.cgi
index 9cc79e1..a02f3df 100755
--- a/index.cgi
+++ b/index.cgi
@@ -5,7 +5,7 @@ use strict;
use warnings;
use POSIX 'strftime', 'ceil', 'floor';
use Socket 'inet_pton', 'inet_ntop', 'AF_INET', 'AF_INET6';
-use TUWF ':html5', 'html_escape', 'mkclass';
+use TUWF ':Html5', 'html_escape', 'mkclass';
my @syntax = sort map /([^\/]+)\.vim$/?$1:(),
@@ -160,7 +160,7 @@ TUWF::post '/mypastes' => sub {
TUWF::get qr{/$code_re\.txt} => sub {
- my $r = getpaste(tuwf->capture(0), 'raw');
+ my $r = getpaste(tuwf->capture(1), 'raw');
return if !ref $r;
tuwf->resHeader('Content-Type' => 'text/plain; charset=UTF-8');
lit $r->{raw};