summaryrefslogtreecommitdiff
path: root/t/old-base.t
diff options
context:
space:
mode:
authorGisle Aas <gisle@aas.no>2001-09-06 19:46:43 +0000
committerGisle Aas <gisle@aas.no>2001-09-06 19:46:43 +0000
commit48c17f858a8d2e6ef0c082f2a7efc288f1fae398 (patch)
treeaabe08aa4f67005ab99cd9f26e611954b7a1b336 /t/old-base.t
parentf2ed7a5af5f42002fffe83af210e0ac640ba8d97 (diff)
downloaduri-48c17f858a8d2e6ef0c082f2a7efc288f1fae398.tar.gz
Avoid "Character in "c" format wrapped" warning in bleadperl
Diffstat (limited to 't/old-base.t')
-rw-r--r--t/old-base.t2
1 files changed, 1 insertions, 1 deletions
diff --git a/t/old-base.t b/t/old-base.t
index cbfd51f..aa31c78 100644
--- a/t/old-base.t
+++ b/t/old-base.t
@@ -582,7 +582,7 @@ sub escape_test {
$url->_expect('as_string',
'http%3A%2F%2Fweb%2Ftry%20%25%3F%23%22%20those');
- my $all = pack('c*',0..255);
+ my $all = pack('C*',0..255);
my $esc = uri_escape($all);
my $new = uri_unescape($esc);
die "uri_escape->uri_unescape mismatch" unless $all eq $new;