prog

frontpage - thread list - new thread - preferences - ?

Emacs mode for SchemeBBS markup

13 2020-02-21 18:15

>>12
In my previous patch, the change in sbbs-read-reply was to make it reply to the correct thread. Previously, it would try to reply to the thread that shared the same id as the post the point was staying on. But my change did not consider the reply-link that is inserted. Here's a fix for that:

diff --git a/iPO6.el b/iPO6.el
index 1e6d3c3..e5cada7 100644
--- a/iPO6.el
+++ b/iPO6.el
@@ -253,12 +253,13 @@
 
 (defun sbbs-read-reply (arg)
   (interactive "P")
-  (let ((id (or sbbs--thread-id (get-text-property (point) 'sbbs-thread-nr)))
+  (let ((id sbbs--thread-id)
+        (rid (get-text-property (point) 'sbbs-thread-nr))
 		(board sbbs--board))
 	(with-current-buffer (generate-new-buffer "*new response*")
 	  (sbbs-compose-mode)
 	  (when (and arg (= (car arg) 4))
-		(insert (format ">>%d" id))
+		(insert (format ">>%d" rid))
 		(newline))
 	  (setq header-line-format (format "Responding to Thread %d" id)
 			sbbs--thread-id id

~~Sorry for mixing up the spaces and tabs...~~

86