[emacs] Reset buffer in mastorg-open

1 files changed, 5 insertions, 3 deletions

diff --git a/emacs/.emacs.d/lisp/my/mastorg.el b/emacs/.emacs.d/lisp/my/mastorg.el
index 61bc027..3544b2e 100644
--- a/emacs/.emacs.d/lisp/my/mastorg.el
+++ b/emacs/.emacs.d/lisp/my/mastorg.el
@@ -196,9 +196,11 @@ Including ancestors and descendants, if any."
 Including the context, i.e. ancestors and descendant toots."
   (interactive "sToot URL: ")
   (with-current-buffer (get-buffer-create mastorg-buffer)
-    (insert (mastorg-format-toot-tree url))
-    (org-mode)
-    (goto-char (point-min)))
+    (let ((inhibit-read-only t))
+      (erase-buffer)
+      (insert (mastorg-format-toot-tree url))
+      (org-mode)
+      (goto-char (point-min))))
   (switch-to-buffer mastorg-buffer))
 
 (provide 'mastorg)