From mboxrd@z Thu Jan 1 00:00:00 1970 From: Christoph Herzog Subject: Re: Linking to Thunderbird (correction) Date: Mon, 10 Dec 2012 08:24:09 +0100 Message-ID: References: Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit Return-path: Received: from eggs.gnu.org ([208.118.235.92]:49629) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Thxj0-0001lN-JG for emacs-orgmode@gnu.org; Mon, 10 Dec 2012 02:24:27 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Thxiy-000376-Ld for emacs-orgmode@gnu.org; Mon, 10 Dec 2012 02:24:26 -0500 Received: from plane.gmane.org ([80.91.229.3]:52522) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Thxiy-000370-Ek for emacs-orgmode@gnu.org; Mon, 10 Dec 2012 02:24:24 -0500 Received: from list by plane.gmane.org with local (Exim 4.69) (envelope-from ) id 1Thxj8-0007GO-Fs for emacs-orgmode@gnu.org; Mon, 10 Dec 2012 08:24:34 +0100 Received: from p5dd7cd78.dip.t-dialin.net ([93.215.205.120]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 10 Dec 2012 08:24:34 +0100 Received: from rhogez by p5dd7cd78.dip.t-dialin.net with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 10 Dec 2012 08:24:34 +0100 In-Reply-To: List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org On 12/08/2012 12:41 AM, Christoph Herzog wrote: > Today I discovered a really practical add-on for Thunderbird that solved > my problem of how to linking to a mail in Thunderbird: > > https://addons.mozilla.org/de/thunderbird/addon/thunderlink/ > > (It requires some modification of the mimetypes on your system as > described in the documentation.) > Next, I set up a file org-thunderlink.el to register the link in orgmode. > The code is not more than this: > > > (require 'org) > > (org-add-link-type "thunderlink" 'org-thunderlink-open) > > (defun org-thunderlink-open (path) > "Opens a specified email in Thunderbird with the help of the add-on > ThunderLink." > ;(message-box path) > (start-process "myname" nil "xdg-open" (concat "thunderlink:" path))) > > (provide 'org-thunderlink) > > The following code works much better: (require 'org) (org-add-link-type "thunderlink" 'org-thunderlink-open) (defun org-thunderlink-open (path) "Opens a specified email in Thunderbird with the help of the add-on ThunderLink." (start-process "myname" nil "thunderbird" "-thunderlink" (concat "thunderlink:" path))) (provide 'org-thunderlink)