Mercurial > hg > nginx-tests

diff _common.pm @ 7:9eb509695651

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: drop our own CRLF constant, use Socket's one instead.
author Maxim Dounin <mdounin@mdounin.ru>
date Mon, 08 Sep 2008 06:08:38 +0400
parents 8813a78ab8b5
children a58a62e9d695
line wrap: on
line diff
--- a/_common.pm
+++ b/_common.pm
@@ -12,15 +12,14 @@ use strict;
 use base qw/ Exporter /;
 
 our @EXPORT = qw/ start_nginx smtp_connect smtp_send smtp_read smtp_check
-	smtp_ok log_in log_out CRLF http /;
+	smtp_ok log_in log_out http /;
 
 ###############################################################################
 
 use Test::More;
 use File::Temp qw/ tempdir /;
 use IO::Socket;
-
-use constant CRLF => "\x0D\x0A";
+use Socket qw/ CRLF /;
 
 our $testdir;
 our $s;