From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: [PATCH] Emphasize caption in html output Date: Mon, 29 Mar 2010 13:39:38 +0200 Message-ID: References: <42A8856C-EF43-408A-8646-D386760175A7@tsdye.com> Mime-Version: 1.0 (Apple Message framework v936) Content-Type: text/plain; charset=US-ASCII; format=flowed; delsp=yes Content-Transfer-Encoding: 7bit Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1NwDvv-0000HK-LS for emacs-orgmode@gnu.org; Mon, 29 Mar 2010 08:19:07 -0400 Received: from [140.186.70.92] (port=50794 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1NwDvu-0000GS-Cp for emacs-orgmode@gnu.org; Mon, 29 Mar 2010 08:19:07 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1NwDvs-00088R-U1 for emacs-orgmode@gnu.org; Mon, 29 Mar 2010 08:19:06 -0400 Received: from mail-ew0-f218.google.com ([209.85.219.218]:36316) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1NwDvs-00088L-Op for emacs-orgmode@gnu.org; Mon, 29 Mar 2010 08:19:04 -0400 Received: by ewy10 with SMTP id 10so170983ewy.32 for ; Mon, 29 Mar 2010 05:19:03 -0700 (PDT) In-Reply-To: <42A8856C-EF43-408A-8646-D386760175A7@tsdye.com> 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: "Thomas S. Dye" Cc: emacs-orgmode list 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 "" 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