tests: adjust for capitalization differences in newer gnutls-serv

This commit is contained in:
Dan Fandrich 2014-07-11 23:43:13 +02:00
Родитель 4dc3a57718
Коммит d582c272a6
2 изменённых файлов: 4 добавлений и 3 удалений

Просмотреть файл

@ -15,7 +15,7 @@ Content-type: text/html
<HTML><BODY>
<CENTER><H1>This is <a href="http://www.gnu.org/software/gnutls">GNUTLS</a></H1></CENTER>
<CENTER><H1>This is <a href="http://www.gnu.org/software/gnutls">GnuTLS</a></H1></CENTER>
<p>Session ID: <i>003030000100000001000000000000000030330001000000B062410001000000</i></p>
@ -64,7 +64,7 @@ Content-type: text/html
<HTML><BODY>
<CENTER><H1>This is <a href="http://www.gnu.org/software/gnutls">GNUTLS</a></H1></CENTER>
<CENTER><H1>This is <a href="http://www.gnu.org/software/gnutls">GnuTLS</a></H1></CENTER>
@ -89,6 +89,7 @@ Accept: */*
s/^<p>Session ID:.*//
s/^<hr><P>Your HTTP header was:<PRE>.*/<PRE>/
s/Protocol version:.*[0-9]//
s/GNUTLS/GnuTLS/
</stripfile>
</verify>

Просмотреть файл

@ -1037,7 +1037,7 @@ sub verifyhttptls {
close(FILE);
}
if($data && ($data =~ /GNUTLS/) && open(FILE, "<$pidfile")) {
if($data && ($data =~ /(GNUTLS|GnuTLS)/) && open(FILE, "<$pidfile")) {
$pid=0+<FILE>;
close(FILE);
if($pid > 0) {