summaryrefslogtreecommitdiffstats
path: root/ds9/library/xpa.tcl
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2017-10-26 21:03:56 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2017-10-26 21:03:56 (GMT)
commit8bfe4ace914f778f289e763761981affe90a624e (patch)
tree594465a86b0b07964ab14c8de27568dc6d3475de /ds9/library/xpa.tcl
parent4379231d249e58a322e4f4dcc58de68505f3d1bd (diff)
downloadblt-8bfe4ace914f778f289e763761981affe90a624e.zip
blt-8bfe4ace914f778f289e763761981affe90a624e.tar.gz
blt-8bfe4ace914f778f289e763761981affe90a624e.tar.bz2
default XPA_METHOD is now localhost
Diffstat (limited to 'ds9/library/xpa.tcl')
-rw-r--r--ds9/library/xpa.tcl5
1 files changed, 5 insertions, 0 deletions
diff --git a/ds9/library/xpa.tcl b/ds9/library/xpa.tcl
index 28c4de8..2f90cab 100644
--- a/ds9/library/xpa.tcl
+++ b/ds9/library/xpa.tcl
@@ -9,6 +9,10 @@ proc InitXPA {} {
global pds9
global env
+ if {![info exists env(XPA_METHOD)]} {
+ set env(XPA_METHOD) localhost
+ }
+
switch -- $ds9(wm) {
x11 -
win32 {}
@@ -2169,6 +2173,7 @@ proc XPAIsLocal {} {
if {[info exists env(XPA_METHOD)]} {
switch $env(XPA_METHOD) {
+ localhost -
unix -
local {return 1}
}