From 7fa4e67e391b350f769f313d82da055ca7d7f836 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Sat, 14 Dec 2019 20:36:14 -0500 Subject: [PATCH] Minor refactors --- modules/completion/ivy/autoload/ivy.el | 4 ++-- modules/lang/org/config.el | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/modules/completion/ivy/autoload/ivy.el b/modules/completion/ivy/autoload/ivy.el index ec0c0770a..5a55cd52f 100644 --- a/modules/completion/ivy/autoload/ivy.el +++ b/modules/completion/ivy/autoload/ivy.el @@ -166,10 +166,10 @@ If ARG (universal argument), open selection in other-window." (user-error "No completion session is active")) (require 'wgrep) (let ((caller (ivy-state-caller ivy-last))) - (if-let* ((occur-fn (plist-get +ivy-edit-functions caller))) + (if-let (occur-fn (plist-get +ivy-edit-functions caller)) (ivy-exit-with-action (lambda (_) (funcall occur-fn))) - (if-let* ((occur-fn (plist-get ivy--occurs-list caller))) + (if-let (occur-fn (plist-get ivy--occurs-list caller)) (let ((buffer (generate-new-buffer (format "*ivy-occur%s \"%s\"*" (if caller (concat " " (prin1-to-string caller)) "") diff --git a/modules/lang/org/config.el b/modules/lang/org/config.el index 4c2bac98e..2d0da9abf 100644 --- a/modules/lang/org/config.el +++ b/modules/lang/org/config.el @@ -674,7 +674,7 @@ between the two." "v" #'+org/goto-visible "x" #'org-capture-goto-last-stored) (:prefix ("l" . "links") - "c" 'org-cliplink + "c" #'org-cliplink "l" #'org-insert-link "L" #'org-insert-all-links "s" #'org-store-link