# HG changeset patch # User Maxim Dounin # Date 1337791507 -14400 # Node ID 7f4a913d7504c73b482521c566dbf8eea8bffeba # Parent ea574aae77cb53f88be34c6b7db159a22417c1b6 Tests: skip casefull location test on caseless OSes. diff -r ea574aae77cb -r 7f4a913d7504 http_location.t --- a/http_location.t Sat May 12 14:27:02 2012 +0400 +++ b/http_location.t Wed May 23 20:45:07 2012 +0400 @@ -78,7 +78,13 @@ like(http_get('/t.GIF'), qr/X-Location: regex/, 'regex with mungled case'); like(http_get('/casefull/t.gif'), qr/X-Location: regex/, 'first regex wins'); like(http_get('/casefull/'), qr/X-Location: casefull/, 'casefull regex'); -like(http_get('/CASEFULL/'), qr/X-Location: root/, - 'casefull regex do not match wrong case'); + +SKIP: { + skip 'caseless os', 1 + if $^O eq 'MSWin32' or $^O eq 'darwin'; + + like(http_get('/CASEFULL/'), qr/X-Location: root/, + 'casefull regex do not match wrong case'); +} ###############################################################################