Fix being unable to set the mark in the sly fonification buffer

2025-10-08 19:14:45 -07:00
parent de7e77c1ea
commit 18b804680d
1 changed files with 2 additions and 1 deletions
--- a/init.el
+++ b/init.el
@ -2208,7 +2208,8 @@ Note that this erases the buffer before doing anything."
       ,@body))
  (defun my/-sly-fontify-current-input ()
    "Function called from `post-command-hook' to fontify the current input."
-    (when-let ((proc (get-buffer-process (current-buffer)))
+    (when-let ((deactivate-mark nil)
+               (proc (get-buffer-process (current-buffer)))
               (start (process-mark proc))
               (end (point-max))
               (input (buffer-substring-no-properties start end))