Hi Carsten,

Could you please apply the following patch to fix a problem where Together links were being incorrectly opened with AddressBook?

Thanks

  -Anthony



----------------------------------------------
diff --git a/contrib/lisp/org-mac-link-grabber.el b/contrib/lisp/org- mac-link-grabber.el
index 46a9565..bb12204 100644
--- a/contrib/lisp/org-mac-link-grabber.el
+++ b/contrib/lisp/org-mac-link-grabber.el
@@ -318,7 +318,7 @@ applications and inserting them in org documents"

 (defun org-mac-together-item-open (uid)
   "Open the given uid, which is a reference to an item in Together"
-  (shell-command (concat "open \"x-together-item:" uid "\"")))
+ (shell-command (concat "open -a Together \"x-together-item:" uid "\"")))

 (defun as-get-selected-together-items ()
   (do-applescript
@@ -378,9 +378,9 @@ applications and inserting them in org documents"
 ;;
 ;;

-(org-add-link-type "addressbook" 'org-mac-together-item-open)
+(org-add-link-type "addressbook" 'org-mac-addressbook-item-open)

-(defun org-mac-together-item-open (uid)
+(defun org-mac-addressbook-item-open (uid)
   "Open the given uid, which is a reference to an item in Together"
   (shell-command (concat "open \"addressbook:" uid "\"")))


_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

Reply via email to