We may not actually find the end tag, so protect against that.

diff --git a/lisp/gnus-html.el b/lisp/gnus-html.el
index 2492545..5eced5f 100644 (file)
--- a/lisp/gnus-html.el
+++ b/lisp/gnus-html.el
@@ -69,7 +69,7 @@
            parameters (match-string 2)
            start (match-beginning 0))
       (delete-region start (point))
-      (when (search-forward (concat "</" tag ">"))
+      (when (search-forward (concat "</" tag ">") nil t)
        (delete-region (match-beginning 0) (match-end 0)))
       (setq end (point))
       (cond