diff options
author | Bastien Guerry <bzg@altern.org> | 2013-01-02 23:46:14 +0100 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2013-01-02 23:46:14 +0100 |
commit | fd0380b52fdde98820c0ac8e21a39d8ed61ae671 (patch) | |
tree | 81f3c54b991e524baaf2ff4d7481cb92ac51e4e8 | |
parent | c1934ccfb4a9867681a16a8215d67a3a5966f511 (diff) | |
download | org-mode-fd0380b52fdde98820c0ac8e21a39d8ed61ae671.tar.gz |
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.
-rw-r--r-- | lisp/org.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/org.el b/lisp/org.el index b75ab0e..7522a0a 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -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) |