[O] What's wrong with org-export-html-final-hook in 8.x

2013-05-14 Thread visayafan 

Recently I upgrade my Org Mode from 7.8.11 to the latest 8.0.2 and find
org-export-html-final-hook doesn't work.

--
(add-hook 'org-export-html-final-hook 'org-delete-!!!)
(defun org-delete-!!! ()
  (interactive)
  (goto-char (point-min))
  (while (re-search-forward A nil t)
(replace-match ))
  (goto-char (point-min))
  (while (re-search-forward B nil t)
(replace-match )))
--

I need this piece of code because when I export my org note to html I
want something like   Afont color=redBthis is
redA/fontB change to  font color=redthis is red/font then
I will have red color. but now it doen't work.

I find this org-hook link
http://orgmode.org/worg/org-configs/org-hooks.html, but this page
doesn't seem to help, it says nothing about the upgrade thing.

So, can anybody help about this? Any help would be very appreciated.

Sorry for my broken English :)

visayafan
--

Re: [O] What's wrong with org-export-html-final-hook in 8.x

2013-05-14 Thread Rasmus 
Hi Visayafan,

 Recently I upgrade my Org Mode from 7.8.11 to the latest 8.0.2 and find
 org-export-html-final-hook doesn't work.

This variable no longer exists, since quite I while I think (check the
git log if interested).  

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

Hope it helps,
Rasmus

-- 
Summon the Mothership!

Re: [O] What's wrong with org-export-html-final-hook in 8.x

2013-05-14 Thread visayafan 
Rasmus ras...@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
--

Re: [O] What's wrong with org-export-html-final-hook in 8.x

2013-05-14 Thread visayafan 


#+BEGIN_SRC emacs-lisp
(eval-after-load 'ox-html
  '(add-to-list 'org-export-filter-final-output-functions
 'fan/org-html-produce-inline-html))
#+END_SRC