From mboxrd@z Thu Jan  1 00:00:00 1970
From: visayafan <visayafan@gmail.com>
Subject: Re: What's wrong with org-export-html-final-hook in 8.x
Date: Wed, 15 May 2013 01:12:35 +0800
Message-ID: <8738tp1o58.fsf@gmail.com>
References: <87ip2lode9.fsf@gmail.com> <87r4h9mvcs.fsf@pank.eu>
Mime-Version: 1.0
Content-Type: text/plain
Return-path: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([208.118.235.92]:55089)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <geo-emacs-orgmode@m.gmane.org>) id 1UcImS-0000Mh-Nk
	for emacs-orgmode@gnu.org; Tue, 14 May 2013 13:12:54 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <geo-emacs-orgmode@m.gmane.org>) id 1UcImR-0005Fr-49
	for emacs-orgmode@gnu.org; Tue, 14 May 2013 13:12:52 -0400
Received: from plane.gmane.org ([80.91.229.3]:55643)
	by eggs.gnu.org with esmtp (Exim 4.71)
	(envelope-from <geo-emacs-orgmode@m.gmane.org>) id 1UcImQ-0005Fn-Ta
	for emacs-orgmode@gnu.org; Tue, 14 May 2013 13:12:51 -0400
Received: from list by plane.gmane.org with local (Exim 4.69)
	(envelope-from <geo-emacs-orgmode@m.gmane.org>) id 1UcImP-0004GJ-Fw
	for emacs-orgmode@gnu.org; Tue, 14 May 2013 19:12:49 +0200
Received: from 113.139.70.104 ([113.139.70.104])
	by main.gmane.org with esmtp (Gmexim 0.1 (Debian))
	id 1AlnuQ-0007hv-00
	for <emacs-orgmode@gnu.org>; Tue, 14 May 2013 19:12:49 +0200
Received: from visayafan by 113.139.70.104 with local (Gmexim 0.1 (Debian))
	id 1AlnuQ-0007hv-00
	for <emacs-orgmode@gnu.org>; Tue, 14 May 2013 19:12:49 +0200
List-Id: "General discussions about Org-mode." <emacs-orgmode.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/emacs-orgmode>
List-Post: <mailto:emacs-orgmode@gnu.org>
List-Help: <mailto:emacs-orgmode-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=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

Rasmus <rasmus@gmx.us> writes:

> You could switch to filters.  Here's an ugly hack for removing titles
> on my web-site (the title is already inserted in a shared preamble).
>
> #+BEGIN_SRC emacs-lisp
>   (defun rasmus/org-html-ignore-title-if-present (string backend info)
>       "Strip title if it's already there. Ignore BACKEND and INFO."
>       (when (and (org-export-derived-backend-p backend 'html)
>                  (string-match "h1 class=\"mytitle\"" string))
>         (replace-regexp-in-string "<h1 class=\"title\">.*?</h1>" "" string)))
>
>   (add-to-list 'org-export-filter-final-output-functions
>                'rasmus/org-html-ignore-title-if-present)
> #+END_SRC
>

Thank you very much Rasmus, your code perfectly does the trick.

#+BEGIN_SRC emacs-lisp
(add-to-list 'org-export-filter-final-output-functions
             'fan/org-html-produce-inline-html)
(defun fan/org-html-produce-inline-html (string backend info)
  "replace !!!!! to < and @@@@@ to >"
  (when (and (org-export-derived-backend-p backend 'html)
             (string-match "!!!!!" string))
    (replace-regexp-in-string (rx  (= 5 "!")
                                   (group (+? anything))
                                   (= 5 "@"))
                              "<\\1>"
                              string)))
#+END_SRC

Now with this code and the macro below I can have colorful font inside a
paragraph.

#+BEGIN_SRC org
#+macro: color !!!!!font color="$1"@@@@@$2!!!!!/font@@@@@
before {{{color(red,this is red)}}} after
#+END_SRC

visayafan
--