diff options
Diffstat (limited to 'ds9/library/photo.tcl')
| -rw-r--r-- | ds9/library/photo.tcl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/ds9/library/photo.tcl b/ds9/library/photo.tcl index ad3f7eb..aeb02f5 100644 --- a/ds9/library/photo.tcl +++ b/ds9/library/photo.tcl @@ -89,10 +89,12 @@ proc ExportPhotoFile {fn format opt} { global export global current - if {$fn == {} || $current(frame) == {}} { + if {$fn == {}} { + return + } + if {$current(frame) == {}} { return } - if {![$current(frame) has fits]} { return } @@ -132,7 +134,6 @@ proc ExportPhotoSocket {ch format opt} { if {$current(frame) == {}} { return } - if {![$current(frame) has fits]} { return } |