Mercurial > hg > nginx-tests
comparison auth_basic.t @ 439:d5b541a8cf95
Tests: removed extra EOL in auth_basic.t requests.
While here, fixed sloppy coding.
author | Sergey Kandaurov <pluknet@nginx.com> |
---|---|
date | Fri, 18 Jul 2014 13:22:58 +0400 |
parents | a9621dbbd0d4 |
children | 64f22e0aaab2 |
comparison
equal
deleted
inserted
replaced
438:60888e2c3f5a | 439:d5b541a8cf95 |
---|---|
118 ############################################################################### | 118 ############################################################################### |
119 | 119 |
120 sub http_get_auth { | 120 sub http_get_auth { |
121 my ($url, $user, $password) = @_; | 121 my ($url, $user, $password) = @_; |
122 | 122 |
123 my $auth = encode_base64($user . ':' . $password); | 123 my $auth = encode_base64($user . ':' . $password, ''); |
124 | 124 |
125 my $r = http(<<EOF); | 125 return http(<<EOF); |
126 GET $url HTTP/1.0 | 126 GET $url HTTP/1.0 |
127 Host: localhost | 127 Host: localhost |
128 Authorization: Basic $auth | 128 Authorization: Basic $auth |
129 | 129 |
130 EOF | 130 EOF |