diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2017-10-16 17:12:44 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2017-10-16 17:12:44 (GMT) |
commit | 17ffb1ea63599ca87e335d4fa71f0c58b14e6b2b (patch) | |
tree | 9b63d1b264a61fbfa186e8abd535dd209d9ba612 /ds9/library/prefs.tcl | |
parent | c1e61b7f7a934ceaeb0f98c0104664d1749a86a3 (diff) | |
download | blt-17ffb1ea63599ca87e335d4fa71f0c58b14e6b2b.zip blt-17ffb1ea63599ca87e335d4fa71f0c58b14e6b2b.tar.gz blt-17ffb1ea63599ca87e335d4fa71f0c58b14e6b2b.tar.bz2 |
Prefs: add prefs for default display size
Diffstat (limited to 'ds9/library/prefs.tcl')
-rw-r--r-- | ds9/library/prefs.tcl | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/ds9/library/prefs.tcl b/ds9/library/prefs.tcl index e86da69..45658b3 100644 --- a/ds9/library/prefs.tcl +++ b/ds9/library/prefs.tcl @@ -159,6 +159,13 @@ proc SavePrefs {} { puts $ch "array set pcurrent \{ [array get pcurrent] \}" puts $ch {array set current [array get pcurrent]} + global canvas + global pcanvas + puts $ch "global icanvas" + puts $ch "global pcanvas" + puts $ch "array set pcanvas \{ [array get pcanvas] \}" + puts $ch {array set icanvas [array get pcanvas]} + global view global pview puts $ch "global view" |