Tests: more QUERY_STRING tests.
This commit is contained in:
@@ -55,6 +55,25 @@ class TestUnitPerlApplication(unit.TestUnitApplicationPerl):
|
||||
self.assertEqual(resp['headers']['Query-String'], 'var1=val1&var2=val2',
|
||||
'Query-String header')
|
||||
|
||||
def test_perl_application_query_string_empty(self):
|
||||
self.load('query_string')
|
||||
|
||||
resp = self.get(url='/?')
|
||||
|
||||
self.assertEqual(resp['status'], 200, 'query string empty status')
|
||||
self.assertEqual(resp['headers']['Query-String'], '',
|
||||
'query string empty')
|
||||
|
||||
@unittest.expectedFailure
|
||||
def test_perl_application_query_string_absent(self):
|
||||
self.load('query_string')
|
||||
|
||||
resp = self.get()
|
||||
|
||||
self.assertEqual(resp['status'], 200, 'query string absent status')
|
||||
self.assertEqual(resp['headers']['Query-String'], '',
|
||||
'query string absent')
|
||||
|
||||
@unittest.expectedFailure
|
||||
def test_perl_application_server_port(self):
|
||||
self.load('server_port')
|
||||
|
||||
Reference in New Issue
Block a user