* eww.el (eww-tag-select): Don't render totally empty <select> forms.

[gnus] / lisp / mm-decode.el

diff --git a/lisp/mm-decode.el b/lisp/mm-decode.el
index 948b2a2..971c26e 100644 (file)
--- a/lisp/mm-decode.el
+++ b/lisp/mm-decode.el
@@ -1817,6 +1817,8 @@ If RECURSIVE, search recursively."
            (delete-region ,(point-min-marker)
                           ,(point-max-marker))))))))
 
+(defvar shr-map)
+
 (defun mm-convert-shr-links ()
   (let ((start (point-min))
        end)
@@ -1829,6 +1831,7 @@ If RECURSIVE, search recursively."
         :help-echo (get-text-property start 'help-echo)
         :keymap shr-map
         (get-text-property start 'shr-url))
+       (put-text-property start end 'local-map nil)
        (setq start end)))))
 
 (defun mm-handle-filename (handle)