Anthony,

this somehow got garbles in the patchworks catcher. Can you please submit the patch again and attach it, so that you email program cannot garble it?

Thanks.

- Carsten

On Jun 24, 2010, at 8:53 PM, Anthony Lander wrote:

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 "\"")))


- Carsten




_______________________________________________
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