diff options
| author | Kyle Meyer <kyle@kyleam.com> | 2020-12-23 19:30:46 -0500 |
|---|---|---|
| committer | Kyle Meyer <kyle@kyleam.com> | 2020-12-24 00:25:22 -0500 |
| commit | 509fb89d06f88364556ad04f6c7b66f395168ded (patch) | |
| tree | 2ac98fc824a86c7d43570eb26aaec39cc462f421 /lisp/km-org.el | |
| parent | bf90c6d7aa1d7b23eb32393d13e601f4ca56d755 (diff) | |
| download | emacs.d-509fb89d06f88364556ad04f6c7b66f395168ded.tar.gz | |
Drop use of dash
Diffstat (limited to 'lisp/km-org.el')
| -rw-r--r-- | lisp/km-org.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/km-org.el b/lisp/km-org.el index 8e8927a..0ade476 100644 --- a/lisp/km-org.el +++ b/lisp/km-org.el @@ -21,7 +21,6 @@ ;;; Code: (require 'cl-lib) -(require 'dash) (require 'org) (require 'org-link-edit) (require 'ox-ascii) @@ -598,9 +597,11 @@ to be easily overriden.") (defun km/org-open-annex-file () "Open a git annex file with `org-open-file'." (interactive) - (--if-let (magit-annex-present-files) - (org-open-file (magit-completing-read "Open annex file" it nil t)) - (message "No annex files found"))) + (org-open-file + (magit-completing-read "Open annex file" + (or (magit-annex-present-files) + (user-error "No annex files found")) + nil t))) (autoload 'km/read-recent-file "km-files") ;;;###autoload |