emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/org-contacts 3d9181c0c4 104/154: org-contacts.el: Use `


From: ELPA Syncer
Subject: [elpa] externals/org-contacts 3d9181c0c4 104/154: org-contacts.el: Use `bound-and-true-p' to check (unbound) var
Date: Fri, 9 Sep 2022 15:58:52 -0400 (EDT)

branch: externals/org-contacts
commit 3d9181c0c45da7cf2d7137c7cebac83c711344b9
Author: David Florness <david@florness.com>
Commit: stardiviner <numbchild@gmail.com>

    org-contacts.el: Use `bound-and-true-p' to check (unbound) var
    
    * org-contacts.el (org-contacts-link-store): Use `bound-and-true-p' to
    check the truthiness of org-id-link-to-org-use-id, which may or may
    not be bound depending on whether org-id has been loaded.  This
    simplifies the code.
---
 org-contacts.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/org-contacts.el b/org-contacts.el
index 7ad4255196..3df1b52ddc 100644
--- a/org-contacts.el
+++ b/org-contacts.el
@@ -1166,7 +1166,7 @@ are effectively trimmed).  If nil, all zero-length 
substrings are retained."
   "Store the contact in `org-contacts-files' with a link."
   (when (and (eq major-mode 'org-mode)
             (member (buffer-file-name) (mapcar 'expand-file-name 
org-contacts-files)))
-    (if (and (featurep 'org-id) org-id-link-to-org-use-id)
+    (if (bound-and-true-p org-id-link-to-org-use-id)
        (org-id-store-link)
       (let ((headline-str (substring-no-properties (org-get-heading t t t t))))
        (org-store-link-props



reply via email to

[Prev in Thread] Current Thread [Next in Thread]