diff options
author | Bastien Guerry <bzg@altern.org> | 2012-08-22 12:24:14 +0200 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2012-08-22 12:24:14 +0200 |
commit | 53c230a9f612294360b606a50c0e974f54152e75 (patch) | |
tree | c83891ac397fb463bdd77ddb2dc48f326de4940e | |
parent | 7d8f69068e2ba01ff7e744f981755b1dc6d50cff (diff) | |
download | org-mode-53c230a9f612294360b606a50c0e974f54152e75.tar.gz |
org.el: Fix bug: include links abbreviations when completing
* org.el (org-insert-link): Fix bug: include links
abbreviations when completing.
-rw-r--r-- | lisp/org.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/org.el b/lisp/org.el index 9af3a7f..1e2947e 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -9324,6 +9324,7 @@ be used as the default description." (desc region) tmphist ; byte-compile incorrectly complains about this (link link-location) + (abbrevs org-link-abbrev-alist-local) entry file all-prefixes auto-desc) (cond (link-location) ; specified by arg, just use it. @@ -9365,7 +9366,7 @@ Use TAB to complete link prefixes, then RET for type-specific completion support ;; Fake a link history, containing the stored links. (setq tmphist (append (mapcar 'car org-stored-links) org-insert-link-history)) - (setq all-prefixes (append (mapcar 'car org-link-abbrev-alist-local) + (setq all-prefixes (append (mapcar 'car abbrevs) (mapcar 'car org-link-abbrev-alist) org-link-types)) (unwind-protect |