diff options
Diffstat (limited to 'lisp/km-org.el')
-rw-r--r-- | lisp/km-org.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/km-org.el b/lisp/km-org.el index aa0b7c0..ce4cac1 100644 --- a/lisp/km-org.el +++ b/lisp/km-org.el @@ -354,7 +354,7 @@ the buffer widened." (insert (format "Call: %s\n\n" cmd)) (pcase-dolist (`(,file ,_ ,text) (nreverse results)) (insert (format "- [ ] %s\n" - (org-make-link-string + (org-link-make-string (concat "file:" file "::" text) (let ((desc (concat file ":" text))) (if (> (length desc) 72) @@ -472,8 +472,8 @@ A numeric prefix sets MAXLEVEL (defaults to 2)." (defun km/get-org-file-buffer () (get-buffer - (org-icompleting-read "Buffer: " (mapcar 'buffer-name - (org-buffer-list 'files))))) + (completing-read "Buffer: " (mapcar 'buffer-name + (org-buffer-list 'files))))) ;;;###autoload (defun km/org-set-refiling-buffer (&optional maxlevel) @@ -525,7 +525,7 @@ beginning of the link." (setq link (concat link slurped) end (match-end 0)) (delete-region beg end) - (insert (org-make-link-string link desc)) + (insert (org-link-make-string link desc)) (goto-char beg) slurped)))) |