diff options
author | Kyle Meyer <kyle@kyleam.com> | 2020-12-23 19:44:22 -0500 |
---|---|---|
committer | Kyle Meyer <kyle@kyleam.com> | 2020-12-24 00:25:22 -0500 |
commit | 991b0bb3a1d86b5ef2347597ca85a0fff5148c3b (patch) | |
tree | 063c390b0f8774d57c9ece0ffed684066f8e59ba /lisp/km-org.el | |
parent | 5b7727428bcb0c4b79bb766097c7936cee98a5bb (diff) | |
download | emacs.d-991b0bb3a1d86b5ef2347597ca85a0fff5148c3b.tar.gz |
Silence byte-compiler
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)))) |