Browse Source

Remove redundant save of point and mark

`org-with-point-at` will do this already (at least for point).
master
Daniel 4 months ago
parent
commit
8f4fa01304
No known key found for this signature in database
1 changed files with 2 additions and 3 deletions
  1. 2
    3
      site-lisp/db-org.el

+ 2
- 3
site-lisp/db-org.el View File

@@ -748,9 +748,8 @@ in an Org Mode buffer or when the clock is not active."
748 748
     (user-error "Not in Org Mode, aborting"))
749 749
   (unless org-clock-marker
750 750
     (user-error "No clocked-in task, aborting"))
751
-  (save-mark-and-excursion
752
-    (org-with-point-at org-clock-marker
753
-      (org-store-link nil t)))
751
+  (org-with-point-at org-clock-marker
752
+    (org-store-link nil t))
754 753
   (pcase-let ((`(,location ,description) (cl-first org-stored-links)))
755 754
     (org-insert-link nil location description)))
756 755
 

Loading…
Cancel
Save