diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2019-06-07 16:45:02 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2019-06-07 16:45:02 (GMT) |
commit | 02ee45abe855be05bacb2b65edd518a4b8f6f51b (patch) | |
tree | fe68ab5d4121b07097cceb79d4dab8695d402013 /ds9/library/plotelement.tcl | |
parent | 72cee7539e883903b6bfec4fd03738753457b992 (diff) | |
download | blt-02ee45abe855be05bacb2b65edd518a4b8f6f51b.zip blt-02ee45abe855be05bacb2b65edd518a4b8f6f51b.tar.gz blt-02ee45abe855be05bacb2b65edd518a4b8f6f51b.tar.bz2 |
support multiple graphs per plot
Diffstat (limited to 'ds9/library/plotelement.tcl')
-rw-r--r-- | ds9/library/plotelement.tcl | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/ds9/library/plotelement.tcl b/ds9/library/plotelement.tcl deleted file mode 100644 index e0dea8a..0000000 --- a/ds9/library/plotelement.tcl +++ /dev/null @@ -1,17 +0,0 @@ -# Copyright (C) 1999-2018 -# Smithsonian Astrophysical Observatory, Cambridge, MA, USA -# For conditions of distribution and use, see copyright notice in "copyright" - -package provide DS9 1.0 - -proc PlotHighliteElement {varname rowlist} { - upvar #0 $varname var - global $varname - - # rowlist starts at 1 - set result {} - foreach rr $rowlist { - append result "[expr $rr-1] " - } - $var(proc,highlite) $varname $result -} |