diff options
| author | jao <jao@gnu.org> | 2011-07-07 01:39:59 +0200 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2011-07-07 01:40:11 +0200 |
| commit | b681793c76fd157da77feba6c7e6a666a29a50b9 (patch) | |
| tree | 692a7dbfad8d3d1d43dd320e0d83e5d2f3176efb /org | |
| parent | 0b7172d4a5d15db15d40a6dd767f64eaf7049a0b (diff) | |
| download | elibs-b681793c76fd157da77feba6c7e6a666a29a50b9.tar.gz elibs-b681793c76fd157da77feba6c7e6a666a29a50b9.tar.bz2 | |
org/devonthink links
Diffstat (limited to 'org')
| -rw-r--r-- | org/jao-org-links.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/org/jao-org-links.el b/org/jao-org-links.el index 4ee4137..1ce7ab3 100644 --- a/org/jao-org-links.el +++ b/org/jao-org-links.el @@ -1,4 +1,5 @@ (require 'jao-org-utils) +(require 'jao-devon) (autoload 'jao-as-safari-doc "jao-applescript.el") @@ -18,6 +19,13 @@ (shell-command (format "mv %s %s" real-file dest-path)))) (browse-url (format "file://%s" (expand-file-name dest-path))))) +;; devon links +(org-add-link-type "x-devonthink-item" 'jao-devon-open 'identity) + +(defun jao-org-insert-devon-link () + (interactive) + (insert (jao-devon-selection))) + (defsubst jao-org--title->file (title) (concat (mapconcat 'downcase (split-string title nil t) "-") ".pdf")) |