From mboxrd@z Thu Jan 1 00:00:00 1970 From: "Eric Schulte" Subject: Re: suppress \label{} in LaTeX export Date: Thu, 01 Oct 2009 16:48:13 -0600 Message-ID: References: <8757.1254429165@alphaville.usa.hp.com> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1MtURj-00079k-Dz for emacs-orgmode@gnu.org; Thu, 01 Oct 2009 18:48:23 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1MtURf-00073p-Lt for emacs-orgmode@gnu.org; Thu, 01 Oct 2009 18:48:23 -0400 Received: from [199.232.76.173] (port=54757 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1MtURf-00073R-FR for emacs-orgmode@gnu.org; Thu, 01 Oct 2009 18:48:19 -0400 Received: from mail-px0-f202.google.com ([209.85.216.202]:32803) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1MtURf-0008QM-0O for emacs-orgmode@gnu.org; Thu, 01 Oct 2009 18:48:19 -0400 Received: by pxi40 with SMTP id 40so688404pxi.24 for ; Thu, 01 Oct 2009 15:48:17 -0700 (PDT) In-Reply-To: <8757.1254429165@alphaville.usa.hp.com> (Nick Dokos's message of "Thu, 01 Oct 2009 16:32:45 -0400") 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: nicholas.dokos@hp.com Cc: Org Mode Hi Nick, Thanks for the patch, sadly I rely on labels in my other latex exports. For now I'm just using the following little elisp function. --8<---------------cut here---------------start------------->8--- (defun schulte/clean-beamer () "remove the \label{sec} headers from latex Beamer documents that have been exported by org." (interactive) (save-excursion (goto-char (point-min)) (while (re-search-forward "^\\\\label{" nil t) (move-beginning-of-line nil) (delete-region (point) (save-excursion (forward-line 1) (point)))))) --8<---------------cut here---------------end--------------->8--- Thanks -- Eric Nick Dokos writes: > Eric Schulte wrote: > > >> Is it possible to suppress the \label{sec-1} lines following each >> headline after a LaTeX export? I've found no mention of this in the >> manual, and the presence of headline labels is breaking my Beamer TOC. >> > > I don't think so: they seem to be inextricably bound with headings. The > code in org-latex.el says: > > (let* (... > (label (org-get-text-property-any 0 'target heading)) > ...) > > > and then > ... > (when label > (insert (mapconcat (lambda (l) (format "\\label{%s}" l)) > label-list "\n") "\n")) > ... > > I recall having problems with labels (among other things) in combination > with beamer before (I "solved" the problem by running the tex file > through a script to just get rid of them), but I don't remember what the > problem was. Maybe it's time to go back and look at the thing again. > > Nick > > PS. Here is a quick-n-dirty patch to disable them - ymmv, uayor and several > other cya disclaimers :-) > > diff --git a/lisp/org-latex.el b/lisp/org-latex.el > index 248d653..f5099f7 100644 > --- a/lisp/org-latex.el > +++ b/lisp/org-latex.el > @@ -852,6 +852,8 @@ and its content." > (let ((num (plist-get org-export-latex-options-plist :section-numbers))) > (mapc (lambda(x) (org-export-latex-subcontent x num)) subcontent))) > > +(defvar org-export-latex-labels-enabled nil) > + > (defun org-export-latex-subcontent (subcontent num) > "Export each cell of SUBCONTENT to LaTeX. > If NUM, export sections as numerical sections." > @@ -862,7 +864,7 @@ If NUM, export sections as numerical sections." > (occur (number-to-string (cdr (assoc 'occur subcontent)))) > (content (cdr (assoc 'content subcontent))) > (subcontent (cadr (assoc 'subcontent subcontent))) > - (label (org-get-text-property-any 0 'target heading)) > + (label (and org-export-latex-labels-enabled (org-get-text-property-any 0 'target heading))) > (label-list (cons label (cdr (assoc label > org-export-target-aliases))))) > (cond