From b502a6f9ac62ef22dda0e9a172dc56538f5c5a9f Mon Sep 17 00:00:00 2001 From: William Joye Date: Fri, 17 Mar 2017 13:44:35 -0400 Subject: BACKUP: fixed an problem where any new WCS must be applied before panning and regions. --- ds9/doc/release/r7.0.html | 1 + ds9/library/backup.tcl | 7 ++++--- ds9/library/wcs.tcl | 1 + 3 files changed, 6 insertions(+), 3 deletions(-) diff --git a/ds9/doc/release/r7.0.html b/ds9/doc/release/r7.0.html index 4b9911b..e13e90b 100644 --- a/ds9/doc/release/r7.0.html +++ b/ds9/doc/release/r7.0.html @@ -780,6 +780,7 @@
  • 03.16.2017 IIS: fixed a minor problem if encode WCS is not LINEAR.
  • 03.16.2017 IIS: fixed a problem with colorscale values.
  • 03.16.2017 IIS: add check to prevent segv in case of mismatch between buffer sizes.
    • +
  • 03.17.2017 BACKUP: fixed an problem where any new WCS must be applied before panning and regions.
  • 03.21.2017 RELEASE version 7.6b1
    • diff --git a/ds9/library/backup.tcl b/ds9/library/backup.tcl index 37cc314..f27b984 100644 --- a/ds9/library/backup.tcl +++ b/ds9/library/backup.tcl @@ -275,15 +275,16 @@ proc BackupFrame {ch which dir} { RGBBackup $ch $which BinBackup $ch $which ScaleBackup $ch $which - PanZoomBackup $ch $which - # Block need to be before Crop + # Block need to be before WCS and Crop BlockBackup $ch $which + # WCS nees to be before Pan/Zoom + WCSBackup $ch $which $fdir $rdir + PanZoomBackup $ch $which CropBackup $ch $which # must be after Pan and Block 3DBackup $ch $which MarkerBackup $ch $which $fdir $rdir CentroidBackup $ch $which - WCSBackup $ch $which $fdir $rdir MaskBackup $ch $which SmoothBackup $ch $which ContourBackup $ch $which $fdir $rdir diff --git a/ds9/library/wcs.tcl b/ds9/library/wcs.tcl index d6f80e6..4a22c64 100644 --- a/ds9/library/wcs.tcl +++ b/ds9/library/wcs.tcl @@ -121,6 +121,7 @@ proc WCSBackup {ch which fdir rdir} { WCSSaveFile $fn puts $ch "WCSLoadFile $rfn" puts $ch "$which wcs replace text 1 \\\{\[WCSFromVar\]\\\}" + puts $ch "RealizeDS9" } } -- cgit v0.12