summaryrefslogtreecommitdiffstats
path: root/ds9/library
diff options
context:
space:
mode:
Diffstat (limited to 'ds9/library')
-rw-r--r--ds9/library/hvsup.tcl2
-rw-r--r--ds9/library/imgsvr.tcl6
2 files changed, 4 insertions, 4 deletions
diff --git a/ds9/library/hvsup.tcl b/ds9/library/hvsup.tcl
index 85a0b3b..da6ab40 100644
--- a/ds9/library/hvsup.tcl
+++ b/ds9/library/hvsup.tcl
@@ -934,7 +934,7 @@ proc HVParseSingle {varname} {
"text/html" -
"text/plain" -
"application/octet-stream" {
- # its never fails, someone can't get there mime types correct.
+ # it never fails, someone can't get there mime types correct.
# Override the mime type based on path
ParseURL $var(url) r
diff --git a/ds9/library/imgsvr.tcl b/ds9/library/imgsvr.tcl
index 3bfa845..273fe09 100644
--- a/ds9/library/imgsvr.tcl
+++ b/ds9/library/imgsvr.tcl
@@ -378,8 +378,10 @@ proc IMGSVRParse {varname} {
}
switch -- [string tolower $var(mime)] {
+ "text/html" -
+ "text/plain" -
"application/octet-stream" {
- # its never fails, someone can't get there mime types correct.
+ # it never fails, someone can't get there mime types correct.
# Override the mime type based on path
switch -- [file extension $var(fn)] {
.bz2 {set var(encoding) bzip2}
@@ -417,8 +419,6 @@ proc IMGSVRParse {varname} {
"image/x-zfits" -
"binary/x-zfits" {set var(encoding) pack}
- "text/html" -
- "text/plain" -
default {
# NOTE: error notices may come as text/html
eval [list $var(proc,error) $varname [msgcat::mc {No Data Available}]]