org.el (org-store-link): Use `org-id-link-to-org-use-id'

* org.el (org-store-link): Use `org-id-link-to-org-use-id'
instead of the obsolete variable name.
This commit is contained in:
Bastien Guerry 2013-01-02 23:46:14 +01:00
parent c1934ccfb4
commit fd0380b52f
1 changed files with 4 additions and 4 deletions

View File

@ -8856,13 +8856,13 @@ For file links, arg negates `org-context-in-file-links'."
"::" (match-string 1))
link cpltxt))
((and (featurep 'org-id)
(or (eq org-link-to-org-use-id t)
(or (eq org-id-link-to-org-use-id t)
(and (org-called-interactively-p 'any)
(or (eq org-link-to-org-use-id 'create-if-interactive)
(and (eq org-link-to-org-use-id
(or (eq org-id-link-to-org-use-id 'create-if-interactive)
(and (eq org-id-link-to-org-use-id
'create-if-interactive-and-no-custom-id)
(not custom-id))))
(and org-link-to-org-use-id (org-entry-get nil "ID"))))
(and org-id-link-to-org-use-id (org-entry-get nil "ID"))))
;; We can make a link using the ID.
(setq link (condition-case nil
(prog1 (org-id-store-link)