summaryrefslogtreecommitdiffstats
path: root/ds9/library/url.tcl
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2017-04-24 19:05:45 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2017-04-24 19:05:45 (GMT)
commit508a62b0e576fcc850fb702b6275ab204ca94ece (patch)
treede7d1d6fb00ed72a8ff0f161086efbee2bd5b953 /ds9/library/url.tcl
parent19df70d23034ed5a3e549b64a7e0a36a569a90ac (diff)
downloadblt-508a62b0e576fcc850fb702b6275ab204ca94ece.zip
blt-508a62b0e576fcc850fb702b6275ab204ca94ece.tar.gz
blt-508a62b0e576fcc850fb702b6275ab204ca94ece.tar.bz2
support https via tls
Diffstat (limited to 'ds9/library/url.tcl')
-rw-r--r--ds9/library/url.tcl4
1 files changed, 3 insertions, 1 deletions
diff --git a/ds9/library/url.tcl b/ds9/library/url.tcl
index 60a5a62..1535aa1 100644
--- a/ds9/library/url.tcl
+++ b/ds9/library/url.tcl
@@ -14,7 +14,8 @@ proc GetFileURL {url fname} {
switch -- $rr(scheme) {
ftp {GetFileFTP $rr(authority) $rr(path) $fn}
file {set fn $rr(path)}
- http -
+ http
+ https -
default {GetFileHTTP $url $fn}
}
}
@@ -87,6 +88,7 @@ proc LoadURLFits {url layer mode} {
ftp {LoadURLFitsFTP $r(authority) $r(path) $layer $mode}
file {LoadURLFitsFile $r(path) $layer $mode}
http -
+ https -
default {LoadURLFitsHTTP $url $layer $mode}
}
}