Make sure that scans only save scratch files if called with 'savetype nosave'

2013-10-15 02:56:43 +11:00
parent 653f113ecc
commit ffdd508bc8
1 changed files with 2 additions and 0 deletions
--- a/site_ansto/instrument/config/scan/scan_common_1.tcl
+++ b/site_ansto/instrument/config/scan/scan_common_1.tcl
@@ -475,6 +475,7 @@ namespace eval scan {
      error "Number of points <$numpoints> must not be less than one"
    }

+    set save_filetype data
    foreach {arg val} $args {
      switch $arg {
        "force" {
@@ -667,6 +668,7 @@ namespace eval scan {
        set numpoints 1
      }

+      set save_filetype data
      foreach {arg val} $args {
        switch $arg {
          "force" {