[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org-contacts c8ceb5290e 099/154: org-contacts.el: Add s
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org-contacts c8ceb5290e 099/154: org-contacts.el: Add support for org-id generated link. |
Date: |
Fri, 9 Sep 2022 15:58:43 -0400 (EDT) |
branch: externals/org-contacts
commit c8ceb5290ef188bd6af10f3de829f824857cde62
Author: stardiviner <numbchild@gmail.com>
Commit: stardiviner <numbchild@gmail.com>
org-contacts.el: Add support for org-id generated link.
* contrib/lisp/org-contacts.el (org-contacts-link-store): Use org-id
store link if org-id-link-to-org-use-id is t.
---
org-contacts.el | 12 +++++++-----
1 file changed, 7 insertions(+), 5 deletions(-)
diff --git a/org-contacts.el b/org-contacts.el
index 44ba455c4f..fa62cd820c 100644
--- a/org-contacts.el
+++ b/org-contacts.el
@@ -1159,11 +1159,13 @@ 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)))
- (let ((headline-str (substring-no-properties (org-get-heading t t t t))))
- (org-store-link-props
- :type "org-contact"
- :link headline-str
- :description headline-str))))
+ (if 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
+ :type "org-contact"
+ :link headline-str
+ :description headline-str)))))
(defun org-contacts--all-contacts ()
"Return an alist (name . (file . position)) of all contacts in
`org-contacts-files'."
- [elpa] externals/org-contacts cb941d4023 052/154: org-contacts.el, add tel property, (continued)
- [elpa] externals/org-contacts cb941d4023 052/154: org-contacts.el, add tel property, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 68a0286a8f 056/154: org-contacts.el, add name alias property., ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 6f1a63da03 067/154: org-contacts: Provide ordering when using cycle completion, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts bb08fb96ab 071/154: Update copyright years., ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 8829fb451a 073/154: Revert "Update copyright years.", ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts c32dbab114 081/154: contrib/lisp/org-contacts.el: Allow the user to customize interactively the vcard export, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 3fa42fb53f 084/154: Remove some home-grown copies of cl-lib functions., ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 75021a1fc2 080/154: contrib/lisp/org-contacts.el: Fix a bug when contacts don't have an email address, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 0ec6917ed8 091/154: Deprecate `org-no-warnings' in favor of `with-no-warnings', ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 304fd01fe3 101/154: org-contacts.el: Add usage comments, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts c8ceb5290e 099/154: org-contacts.el: Add support for org-id generated link.,
ELPA Syncer <=
- [elpa] externals/org-contacts 0107e8ecdb 100/154: org-contacts.el: Inherit face from org-link, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts af3a5cb6fa 102/154: org-contacts.el: replace obsolete alias `loop' with `cl-loop', ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 2c0bb90259 097/154: contrib/lisp/org-contacts.el: Add stardiviner as the maintainer, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts ca3b10d5a8 098/154: org-contacts.el: Fix org-store-link error caused by org-contacts, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 0e33f05c4e 105/154: org-contacts.el: Fix store link function does not return link., ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 3d9181c0c4 104/154: org-contacts.el: Use `bound-and-true-p' to check (unbound) var, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 3fa6b4c36b 120/154: Add package introduction in README, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 507e48cbd1 116/154: add README.org, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 986a5b3280 109/154: Prefer HTTPS to HTTP in most links, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 85dd965906 126/154: Remove testing code, ELPA Syncer, 2022/09/09