diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-01-22 12:34:39 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-01-22 12:34:39 +0000 |
commit | ffd2dff2e01ae9b3aa6cf87f762201cc006553e8 (patch) | |
tree | e0e4e76766027cc879818f2d3376b93eb1f826a3 /t/lib | |
parent | 7ba65c74d339105975b4f9ae78fcfe73b8058589 (diff) | |
download | perl-ffd2dff2e01ae9b3aa6cf87f762201cc006553e8.tar.gz |
CGI.pm upgraded to v2.56 from CPAN
p4raw-id: //depot/perl@4842
Diffstat (limited to 't/lib')
-rwxr-xr-x | t/lib/cgi-html.t | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/t/lib/cgi-html.t b/t/lib/cgi-html.t index e878b21e50..c51318e344 100755 --- a/t/lib/cgi-html.t +++ b/t/lib/cgi-html.t @@ -69,12 +69,12 @@ test(15,start_html(-Title=>'The world of foo') ."\n" eq <<END,"start_html()"); END ; test(16,($cookie=cookie(-name=>'fred',-value=>['chocolate','chip'],-path=>'/')) eq - 'fred=chocolate&chip; domain=localhost; path=/',"cookie()"); + 'fred=chocolate&chip; path=/',"cookie()"); if (!$Is_EBCDIC) { -test(17,header(-Cookie=>$cookie) =~ m!^Set-Cookie: fred=chocolate&chip\; domain=localhost; path=/\015\012Date:.*\015\012Content-Type: text/html\015\012\015\012!s, +test(17,header(-Cookie=>$cookie) =~ m!^Set-Cookie: fred=chocolate&chip\; path=/\015\012Date:.*\015\012Content-Type: text/html\015\012\015\012!s, "header(-cookie)"); } else { -test(17,header(-Cookie=>$cookie) =~ m!^Set-Cookie: fred=chocolate&chip\; domain=localhost; path=/\r\nDate:.*\r\nContent-Type: text/html\r\n\r\n!s, +test(17,header(-Cookie=>$cookie) =~ m!^Set-Cookie: fred=chocolate&chip\; path=/\r\nDate:.*\r\nContent-Type: text/html\r\n\r\n!s, "header(-cookie)"); } test(18,start_h3 eq '<H3>'); |