Commit Diff

Commit:
85a5dd36fcadec0bf159aae870f18537a078c6b6
From:
Lukas Henkel <lh@entf.net>
Date:
Message:
Restore point after doas-ing buffer
Actions:
Patch | Tree
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 ()