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

This commit is contained in:
Ferdi Franceschini
2013-10-15 02:56:43 +11:00
parent 653f113ecc
commit ffdd508bc8

View File

@@ -475,6 +475,7 @@ namespace eval scan {
error "Number of points <$numpoints> must not be less than one" error "Number of points <$numpoints> must not be less than one"
} }
set save_filetype data
foreach {arg val} $args { foreach {arg val} $args {
switch $arg { switch $arg {
"force" { "force" {
@@ -667,6 +668,7 @@ namespace eval scan {
set numpoints 1 set numpoints 1
} }
set save_filetype data
foreach {arg val} $args { foreach {arg val} $args {
switch $arg { switch $arg {
"force" { "force" {