diff options
| -rwxr-xr-x | tests/it_url.t | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/it_url.t b/tests/it_url.t index 5cb2b29..b6569b1 100755 --- a/tests/it_url.t +++ b/tests/it_url.t @@ -63,6 +63,14 @@ is( '$url->path' ); +# punycode test +$url = new it_url('http://www.sörtsch.ch/?q=ültra#sörtsch'); +is( + $url->realhostname, + 'www.xn--srtsch-wxa.ch', + 'punycode $url->realhostname' +); + $_SERVER['HTTP_HOST'] = "gna.ch"; is( it_url::absolute("/"), |