From 210481044a952eb6b8ad1189b82f9fc93cbd90b1 Mon Sep 17 00:00:00 2001 From: William Joye Date: Sat, 19 Jan 2019 15:32:46 -0500 Subject: pkg require htp.tcl xmfbox.tcl tkfbox.tcl --- ds9/library/ds9.tcl | 4 ---- ds9/library/htp.tcl | 3 +++ ds9/library/tkfbox.tcl | 3 +++ ds9/library/xmfbox.tcl | 2 ++ 4 files changed, 8 insertions(+), 4 deletions(-) diff --git a/ds9/library/ds9.tcl b/ds9/library/ds9.tcl index 11af7f3..2153905 100644 --- a/ds9/library/ds9.tcl +++ b/ds9/library/ds9.tcl @@ -230,10 +230,6 @@ package require Tls package require xmlrpc package require DS9 -source $ds9(root)/library/htp.tcl -source $ds9(root)/library/xmfbox.tcl -source $ds9(root)/library/tkfbox.tcl - # post package load switch $ds9(wm) { x11 { diff --git a/ds9/library/htp.tcl b/ds9/library/htp.tcl index 42fd919..c623ea6 100644 --- a/ds9/library/htp.tcl +++ b/ds9/library/htp.tcl @@ -1,3 +1,6 @@ +package provide DS9 1.0 +namespace eval ::http {} + # Needed because some sites return 'x-fits' (CADC) in Content-Encoding proc http::ContentEncoding {token} { upvar 0 $token state diff --git a/ds9/library/tkfbox.tcl b/ds9/library/tkfbox.tcl index 50a9d6c..87e9ece 100644 --- a/ds9/library/tkfbox.tcl +++ b/ds9/library/tkfbox.tcl @@ -16,6 +16,9 @@ # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # +package provide DS9 1.0 +namespace eval ::tk::msgcat {} + namespace eval ::tk::dialog {} namespace eval ::tk::dialog::file { namespace import -force ::tk::msgcat::* diff --git a/ds9/library/xmfbox.tcl b/ds9/library/xmfbox.tcl index 41726ce..f6fcec4 100644 --- a/ds9/library/xmfbox.tcl +++ b/ds9/library/xmfbox.tcl @@ -10,6 +10,8 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. +package provide DS9 1.0 + namespace eval ::tk::dialog {} namespace eval ::tk::dialog::file {} -- cgit v0.12