summaryrefslogtreecommitdiffstats
path: root/ds9/library/movie.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'ds9/library/movie.tcl')
-rw-r--r--ds9/library/movie.tcl9
1 files changed, 8 insertions, 1 deletions
diff --git a/ds9/library/movie.tcl b/ds9/library/movie.tcl
index 3320f6a..88f23b6 100644
--- a/ds9/library/movie.tcl
+++ b/ds9/library/movie.tcl
@@ -337,7 +337,14 @@ proc MoviePhotoGIF {} {
}
if {$movie(first)} {
- agif create $movie(fn) [image width $ph] [image height $ph]
+ switch [$current(frame) get type] {
+ rgb {
+ agif create $movie(fn) [image width $ph] [image height $ph] 16
+ }
+ default {
+ agif create $movie(fn) [image width $ph] [image height $ph] 4
+ }
+ }
set movie(first) 0
}
agif add $ph