summaryrefslogtreecommitdiffstats
path: root/ds9/library/var.tcl
blob: 549756fd37a775e7709fd8882bebb414c02620a5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
#  Copyright (C) 1999-2016
#  Smithsonian Astrophysical Observatory, Cambridge, MA, USA
#  For conditions of distribution and use, see copyright notice in "copyright"

package provide DS9 1.0

proc LoadVar {varname fn layer mode} {
    global loadParam

    set loadParam(file,type) fits
    set loadParam(file,mode) $mode
    set loadParam(load,type) var
    set loadParam(var,name) $varname
    set loadParam(file,name) "$fn"

    # mask not supported
    set loadParam(load,layer) {}

    ProcessLoad
}