From b681793c76fd157da77feba6c7e6a666a29a50b9 Mon Sep 17 00:00:00 2001 From: jao Date: Thu, 7 Jul 2011 01:39:59 +0200 Subject: org/devonthink links --- org/jao-org-links.el | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'org') 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")) -- cgit v1.2.3