diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2017-04-24 19:05:45 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2017-04-24 19:05:45 (GMT) |
commit | 508a62b0e576fcc850fb702b6275ab204ca94ece (patch) | |
tree | de7d1d6fb00ed72a8ff0f161086efbee2bd5b953 /ds9/library/url.tcl | |
parent | 19df70d23034ed5a3e549b64a7e0a36a569a90ac (diff) | |
download | blt-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.tcl | 4 |
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} } } |