# HG changeset patch
# User Henry S. Thompson <ht@inf.ed.ac.uk>
# Date 1782983383 -3600
# Node ID 8e82ac8512d220aea3cc9197d50f04c61b985675
# Parent  e75e61ad9ae19d14b69897e9314a533c8086b104
more html handling

diff -r e75e61ad9ae1 -r 8e82ac8512d2 my-news.el
--- a/my-news.el	Thu Jul 02 10:09:04 2026 +0100
+++ b/my-news.el	Thu Jul 02 10:09:43 2026 +0100
@@ -810,7 +810,7 @@
 
 (defun use-text-not-html (&optional clear)
   (when (and (if clear (looking-at "<html")
-	       (looking-at "> <\\(html\\|div\\)"))
+	       (looking-at "> <\\(!doctype\\|html\\|div\\)"))
 	     (bufferp (get-buffer "*Shell Command Output*")))
     ;; replace HTML only with result of my HTML filter
     (delete-region (point)(mark t))