Bind RET and TAB on images for better UX.

[gnus] / lisp / gnus-xmas.el

diff --git a/lisp/gnus-xmas.el b/lisp/gnus-xmas.el
index 6281238..1e5fafb 100644 (file)
--- a/lisp/gnus-xmas.el
+++ b/lisp/gnus-xmas.el
@@ -936,7 +936,8 @@ XEmacs compatibility workaround."
   (let ((type (cond
               (type
                (symbol-name type))
-              ((string-match "[.]" file)
+              ((and (not data-p)
+                    (string-match "[.]" file))
                (car (last (split-string file "[.]"))))))
        (face (plist-get props :face))
        glyph)
@@ -1003,5 +1004,4 @@ Warning: Don't insert text immediately after the image."
 
 (provide 'gnus-xmas)
 
-;;; arch-tag: 4e84de3f-ea0a-4ee3-bfeb-e03d46fcacef
 ;;; gnus-xmas.el ends here