* gnus-xmas.el (gnus-xmas-create-image): Take optional
parameters.
+ (gnus-xmas-put-image): Allow non-strings to be passed.
* gnus-art.el (article-display-x-face): Use optional parameters.
(car (last (split-string file "[.]"))))))
(if (equal type "xbm")
(make-glyph (list (cons 'x file)))
- (with-tmp-buffer
+ (with-temp-buffer
(if data-p
(insert file)
(insert-file-contents file))
Warning: Don't insert text immediately after the image."
(let ((begin (point))
extent)
- (insert string)
+ (insert (or string " "))
(setq extent (make-extent begin (point)))
(set-extent-property extent 'gnus-image t)
(set-extent-property extent 'duplicable t)