From mboxrd@z Thu Jan 1 00:00:00 1970 From: Noorul Islam K M Subject: [PATCH] Re: html-export mangels mailto: links Date: Thu, 02 Sep 2010 12:05:43 +0530 Message-ID: <87iq2o3b5s.fsf@noorul.maa.corp.collab.net> References: <87fwxtjjmh.fsf@Rainer.invalid> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from [140.186.70.92] (port=35817 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Or3QE-0007op-Un for emacs-orgmode@gnu.org; Thu, 02 Sep 2010 02:37:20 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1Or3QD-0005jB-Jh for emacs-orgmode@gnu.org; Thu, 02 Sep 2010 02:37:18 -0400 Received: from mail-yw0-f41.google.com ([209.85.213.41]:52894) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Or3QD-0005is-Dq for emacs-orgmode@gnu.org; Thu, 02 Sep 2010 02:37:17 -0400 Received: by ywl5 with SMTP id 5so70732ywl.0 for ; Wed, 01 Sep 2010 23:37:15 -0700 (PDT) In-Reply-To: <87fwxtjjmh.fsf@Rainer.invalid> (Achim Gratz's message of "Wed, 01 Sep 2010 22:26:14 +0200") List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Achim Gratz Cc: emacs-orgmode@gnu.org --=-=-= Achim Gratz writes: > HTML export removes the "mailto:" from a link, which will then be > interpreted as a local link by the browser. > > For an example, see the link to this mailing list in > ORGWEBPAGE/index.org and the corresponding HTML export on orgmode-org > (or just the local file). > org-html.el : Fix exporting file, mailto, news and ftp protocols. * lisp/org-html.el (org-html-make-link): (expand-file-name ) removes one "/" from "///path-to-file", so add one. Anything other than 'file' type should be exported along with the type. TINYCHANGE Thanks and Regards Noorul --=-=-= Content-Disposition: attachment; filename=org-html.el.txt diff --git a/lisp/org-html.el b/lisp/org-html.el index 099b2e3..4430768 100644 --- a/lisp/org-html.el +++ b/lisp/org-html.el @@ -720,7 +720,7 @@ MAY-INLINE-P allows inlining it as an image." ;;Substitute just if original path was absolute. ;;(Otherwise path must remain relative) (if (file-name-absolute-p path) - (expand-file-name path) + (concat "/" (expand-file-name path)) path))) ((string= type "") (list nil path)) @@ -756,8 +756,7 @@ MAY-INLINE-P allows inlining it as an image." (setq thefile (let ((str (org-export-html-format-href thefile))) - (if (and type (not (string= "file" type)) - (org-string-match-p "^//" str)) + (if (and type (not (string= "file" type))) (concat type ":" str) str))) --=-=-= Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline _______________________________________________ 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 --=-=-=--