forked from mirrors/org-mode
Better default description for link to Org-mode heading
Requested by Stefan Vollmar.
This commit is contained in:
parent
daa2800ff3
commit
51ad548037
|
@ -1,5 +1,8 @@
|
||||||
2009-06-20 Carsten Dominik <carsten.dominik@gmail.com>
|
2009-06-20 Carsten Dominik <carsten.dominik@gmail.com>
|
||||||
|
|
||||||
|
* org.el (org-store-link): Better default description for link to
|
||||||
|
Org-mode headline.
|
||||||
|
|
||||||
* org-exp.el (org-export-generic): Autoload the generic exporter
|
* org-exp.el (org-export-generic): Autoload the generic exporter
|
||||||
function.
|
function.
|
||||||
(org-export): Implement the `g' key for the generic exporter.
|
(org-export): Implement the `g' key for the generic exporter.
|
||||||
|
|
|
@ -7037,7 +7037,7 @@ For file links, arg negates `org-context-in-file-links'."
|
||||||
(condition-case nil
|
(condition-case nil
|
||||||
(org-make-org-heading-search-string txt)
|
(org-make-org-heading-search-string txt)
|
||||||
(error "")))
|
(error "")))
|
||||||
desc "NONE")))
|
desc (or (nth 4 (org-heading-components)) "NONE"))))
|
||||||
(if (string-match "::\\'" cpltxt)
|
(if (string-match "::\\'" cpltxt)
|
||||||
(setq cpltxt (substring cpltxt 0 -2)))
|
(setq cpltxt (substring cpltxt 0 -2)))
|
||||||
(setq link (org-make-link cpltxt)))))
|
(setq link (org-make-link cpltxt)))))
|
||||||
|
|
Loading…
Reference in New Issue