Alexandre Julliard : testbot: Use https URLs when SSL is enabled.
Alexandre Julliard
julliard at winehq.org
Fri Aug 30 10:58:54 CDT 2013
Module: tools
Branch: master
Commit: 0909a7476a8da51e7245659e736d92424be8bffc
URL: http://source.winehq.org/git/tools.git/?a=commit;h=0909a7476a8da51e7245659e736d92424be8bffc
Author: Alexandre Julliard <julliard at winehq.org>
Date: Thu Aug 29 17:14:09 2013 +0200
testbot: Use https URLs when SSL is enabled.
---
testbot/bin/WineSendLog.pl | 6 ++++--
1 files changed, 4 insertions(+), 2 deletions(-)
diff --git a/testbot/bin/WineSendLog.pl b/testbot/bin/WineSendLog.pl
index ce69c21..aec2bee 100755
--- a/testbot/bin/WineSendLog.pl
+++ b/testbot/bin/WineSendLog.pl
@@ -424,6 +424,8 @@ EOF
}
}
+ my $WebSite = ($UseSSL ? "https://" : "http://") . $WebHostName;
+
if ($Messages)
{
open (SENDMAIL, "|/usr/sbin/sendmail -oi -t -odq");
@@ -440,7 +442,7 @@ Being a bot and all I'm not very good at pattern recognition, so I might be
wrong, but could you please double-check?
Full results can be found at
EOF
- print SENDMAIL "http://$WebHostName/JobDetails.pl?Key=",
+ print SENDMAIL "$WebSite/JobDetails.pl?Key=",
$Job->GetKey(), "\n\n";
print SENDMAIL "Your paranoid android.\n\n";
@@ -468,7 +470,7 @@ EOF
{
print $result "Status: " . ($Messages ? "Failed" : "OK") . "\n";
print $result "Job-ID: " . $Job->Id . "\n";
- print $result "URL: http://$WebHostName/JobDetails.pl?Key=" . $Job->GetKey() . "\n";
+ print $result "URL: $WebSite/JobDetails.pl?Key=" . $Job->GetKey() . "\n";
foreach my $Key (@SortedKeys)
{
More information about the wine-cvs
mailing list