* sb-sankei.el (shimbun-sankei-clear-contents): Don't infloop

emacs-w3m · Jun 14, 2021 · 477b7a8 · 477b7a8
1 parent 6b39d60
commit 477b7a8
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 1 deletion.
diff --git a/shimbun/ChangeLog b/shimbun/ChangeLog
@@ -1,3 +1,7 @@
+2021-06-14  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+	* sb-sankei.el (shimbun-sankei-clear-contents): Don't infloop.
+
 2021-06-10  Katsumi Yamaoka  <yamaoka@jpl.org>
 
 	Make Sankei work on Emacs 26 and 27

diff --git a/shimbun/sb-sankei.el b/shimbun/sb-sankei.el
@@ -300,7 +300,8 @@ To use this, set both `w3m-use-cookies' and `w3m-use-form' to t."
 					       (concat "<br>\n" caption
 						       "<br><br>")
 					     ""))
-				   contents)))))
+				   contents))))
+		    (goto-char nd))
 		(if (and (search-forward "\"content\":" nd t)
 			 (eq (following-char) ?\")
 			 (setq tem (ignore-errors (read (current-buffer)))))