diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-04-12 12:43:56 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-04-12 12:43:56 +0200 |
| commit | 3de2462da7306f3b342f6402dd0c0b185ac2741f (patch) | |
| tree | 080a184fd6741559f534339f6fbae04560642a9c /src/image.c | |
| parent | 8c3d655fe76e1148adcaac0b2fe9550621ba7e54 (diff) | |
| download | emacs-3de2462da7306f3b342f6402dd0c0b185ac2741f.tar.gz emacs-3de2462da7306f3b342f6402dd0c0b185ac2741f.tar.bz2 emacs-3de2462da7306f3b342f6402dd0c0b185ac2741f.zip | |
Animate GIF images that don't have an explicit delay setting
* src/image.c (gif_load): Use the default delay for GIF images
that don't explicitly state a delay.
Diffstat (limited to 'src/image.c')
| -rw-r--r-- | src/image.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/image.c b/src/image.c index f6143f5b46e..3b3d1fc080a 100644 --- a/src/image.c +++ b/src/image.c @@ -9208,11 +9208,11 @@ gif_load (struct frame *f, struct image *img) } } img->lisp_data = list2 (Qextension_data, img->lisp_data); - if (delay) - img->lisp_data - = Fcons (Qdelay, - Fcons (make_float (delay / 100.0), - img->lisp_data)); + img->lisp_data + = Fcons (Qdelay, + /* Default GIF delay is 1/15th of a second. */ + Fcons (make_float (delay? delay / 100.0: 1.0 / 15), + img->lisp_data)); } if (gif->ImageCount > 1) |