Commit Diff


commit - f73f36e4cf19a80bf03fd028a4ea9bf2ef461aad
commit + bde020d77bc19f409bd6343ddbf27bad4928c8bc
blob - 7c425f5f5766b488887962b46185965068d19ea2
blob + 8402a4428a78d5807d1b87b0647f17800a661e7a
--- lisp/lh.el
+++ lisp/lh.el
@@ -95,4 +95,10 @@
   (let ((val (get-register register)))
     (insert (format format-string val))))
 
+(defun lh/doas-current-buffer ()
+  (interactive)
+  (let ((old (current-buffer)))
+    (find-file (concat "/doas::" (buffer-file-name)))
+    (kill-buffer old)))
+
 (provide 'lh)