Re: [Orgmode] [PATCH] Emphasize caption in html output

2010-03-29 Thread Carsten Dominik

Hi Thomas,

I have just checked in a similar patch, thanks a lot.

- Carsten

On Mar 29, 2010, at 7:45 AM, Thomas S. Dye wrote:


Hi Carsten,

This appears to emphasize org-mode markup in html export of  
captions.  It seems to work, but I have a difficult time  
understanding org-mode code and haven't any sense of the proper way  
to do things, etc., so caveat emptor.


All the best,
Tom

---
Modified lisp/org-html.el
diff --git a/lisp/org-html.el b/lisp/org-html.el
index d75d8f5..71e3e99 100644
--- a/lisp/org-html.el
+++ b/lisp/org-html.el
@@ -1521,7 +1521,7 @@ lang=\%s\ xml:lang=\%s\
  (save-match-data
(if (string-match ^ltxpng/ src)
(format img src=\%s\/ src)
-  (let* ((caption (org-find-text-property-in-string 'org- 
caption src))
+  (let* ((caption (org-export-html-convert-emphasize (org-find- 
text-property-in-string 'org-caption src)))

 (attr (org-find-text-property-in-string 'org-attributes src))
 (label (org-find-text-property-in-string 'org-label src)))
(concat
@@ -1599,11 +1599,11 @@ lang=\%s\ xml:lang=\%s\
;; column and the special lines
(setq lines (org-table-clean-before-export lines)))

-  (let* ((caption (or (get-text-property 0 'org-caption (car lines))
+  (let* ((caption (org-export-html-convert-emphasize (or (get-text- 
property 0 'org-caption (car lines))

  (get-text-property (or (next-single-property-change
  0 'org-caption (car lines))
 0)
-'org-caption (car lines
+'org-caption (car lines)
 (attributes (or (get-text-property 0 'org-attributes (car lines))
 (get-text-property (or (next-single-property-change
 0 'org-attributes (car lines))



___
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


- Carsten





___
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


[Orgmode] [PATCH] Emphasize caption in html output

2010-03-28 Thread Thomas S. Dye

Hi Carsten,

This appears to emphasize org-mode markup in html export of captions.   
It seems to work, but I have a difficult time understanding org-mode  
code and haven't any sense of the proper way to do things, etc., so  
caveat emptor.


All the best,
Tom

---
Modified lisp/org-html.el
diff --git a/lisp/org-html.el b/lisp/org-html.el
index d75d8f5..71e3e99 100644
--- a/lisp/org-html.el
+++ b/lisp/org-html.el
@@ -1521,7 +1521,7 @@ lang=\%s\ xml:lang=\%s\
   (save-match-data
 (if (string-match ^ltxpng/ src)
(format img src=\%s\/ src)
-  (let* ((caption (org-find-text-property-in-string 'org-caption  
src))
+  (let* ((caption (org-export-html-convert-emphasize (org-find- 
text-property-in-string 'org-caption src)))

 (attr (org-find-text-property-in-string 'org-attributes src))
 (label (org-find-text-property-in-string 'org-label src)))
(concat
@@ -1599,11 +1599,11 @@ lang=\%s\ xml:lang=\%s\
 ;; column and the special lines
 (setq lines (org-table-clean-before-export lines)))

-  (let* ((caption (or (get-text-property 0 'org-caption (car lines))
+  (let* ((caption (org-export-html-convert-emphasize (or (get-text- 
property 0 'org-caption (car lines))

  (get-text-property (or (next-single-property-change
  0 'org-caption (car lines))
 0)
-'org-caption (car lines
+'org-caption (car lines)
 (attributes (or (get-text-property 0 'org-attributes (car lines))
 (get-text-property (or (next-single-property-change
 0 'org-attributes (car lines))



___
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