Support pulling PGNs from HTTPS.

[remoteglot] / remoteglot.pl

diff --git a/remoteglot.pl b/remoteglot.pl
index 6443c3159d56b916d69b5a84df5e167c997ffac7..5e1e94aa99cdf28cfbe1909b5f84a5d2817ef689 100755 (executable)
--- a/remoteglot.pl
+++ b/remoteglot.pl
@@ -121,7 +121,7 @@ my $ev1 = AnyEvent->io(
        }
 );
 if (defined($remoteglotconf::target)) {
-       if ($remoteglotconf::target =~ /^http:/) {
+       if ($remoteglotconf::target =~ /^https?:/) {
                fetch_pgn($remoteglotconf::target);
        } else {
                $t->cmd("observe $remoteglotconf::target");