commit 85a5dd36fcadec0bf159aae870f18537a078c6b6
from: Lukas Henkel <lh@entf.net>
date: Thu Jun 02 18:16:38 2022 UTC

Restore point after doas-ing buffer

commit - ceeebd9f2e81e56893fe19e7e8cce5c7bee406c2
commit + 85a5dd36fcadec0bf159aae870f18537a078c6b6
blob - c4d683af3ff8555076632780b593f1b6a2226bb3
blob + 7b878cbb7f1d3dd70b06b92bb3ecbcb1809cbcad
--- lisp/lh.el
+++ lisp/lh.el
@@ -86,8 +86,10 @@
 
 (defun lh/doas-current-buffer ()
   (interactive)
-  (let ((old (current-buffer)))
+  (let ((old-point (point))
+        (old (current-buffer)))
     (find-file (concat "/doas::" (buffer-file-name)))
+    (goto-char old-point)
     (kill-buffer old)))
 
 (defun lh/buffer-create-new ()