emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Orgmode] Re: patch for org-mac-link-grabber


From: Carsten Dominik
Subject: [Orgmode] Re: patch for org-mac-link-grabber
Date: Tue, 29 Jun 2010 06:53:23 +0200

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






reply via email to

[Prev in Thread] Current Thread [Next in Thread]