package Ġorg . http 4 k . filter Ċ Ċ import Ġio . kot est . assertions . should Fail Ċ import Ġorg . http 4 k . core . Method . GET Ċ import Ġorg . http 4 k . core . Request Ċ import Ġorg . http 4 k . core . Response Ċ import Ġorg . http 4 k . core . Status . Companion . OK Ċ import Ġorg . http 4 k . core . then Ċ import Ġorg . http 4 k . kot est . have Header Ċ import Ġorg . junit . jupiter . api . Test Ċ Ċ class ĠExtensions Test Ġ{ ĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` request Ġmatching Ġas Ġa Ġfilter `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġapp Ġ= ĠRequest Filters . Assert ( have Header (" bob ")). then Ġ{ ĠResponse ( OK ) Ġ} ĊĊĠĠĠĠĠĠĠ Ġapp ( Request ( GET , Ġ""). header (" bob ", Ġ" foo ")) ĊĊĠĠĠĠĠĠĠ Ġshould Fail Ġ{ Ġapp ( Request ( GET , Ġ"")) Ġ} ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` response Ġmatching Ġas Ġa Ġfilter `() Ġ{ ĊĠĠĠĠĠĠĠ ĠResponse Filters . Assert ( have Header (" bob "). invert ()). then Ġ{ ĠResponse ( OK ) Ġ} ( Request ( GET , Ġ"")) ĊĊĠĠĠĠĠĠĠ Ġshould Fail Ġ{ ĠResponse Filters . Assert ( have Header (" bob ")). then Ġ{ ĠResponse ( OK ) Ġ} ( Request ( GET , Ġ"")) Ġ} ĊĠĠĠ Ġ} Ċ } Ċ