emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Rasmus <rasmus@gmx.us>
To: emacs-orgmode@gnu.org
Subject: Re: Target and link text normalised to `orgtargetn'
Date: Mon, 20 Apr 2015 15:13:10 +0200	[thread overview]
Message-ID: <87618rc595.fsf@gmx.us> (raw)
In-Reply-To: <87sibvccnc.fsf@nicolasgoaziou.fr> (Nicolas Goaziou's message of "Mon, 20 Apr 2015 12:33:27 +0200")

[-- Attachment #1: Type: text/plain, Size: 820 bytes --]

Nicolas Goaziou <mail@nicolasgoaziou.fr> writes:

> Rasmus <rasmus@gmx.us> writes:
>
>> Nicolas Goaziou <mail@nicolasgoaziou.fr> writes:
>>
>>> However, "tab:orgtable1" or "sec:orgheadline1" are fine, IMO, since
>>> "org" part can keep the label out of userland.
>>
>> That's fine with me as well.
>
> Fair enough. Do you want to take care of extending `org-latex--label'
> appropriately?

Can we have conditional dependence on texmathp?  If so, maybe something
like the attached, though the latex-environment part is ugly.

Results areq pretty ugly.  E.g. for headline, table, figure, latex-math
env, latex-env:

    \ref{sec:orgheadline1}, \ref{tab:orgtable1}, \ref{fig:orgparagraph1},
    \ref{eq:orglatexenvironment1}, \ref{orglatexenvironment2}

—Rasmus

-- 
Vote for proprietary math!

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: 0001-ox-latex-Use-standard-LaTeX-label-prefixes.patch --]
[-- Type: text/x-diff, Size: 1294 bytes --]

From cc2c027ab611c3abcdc5c7cac46b6f45d682657f Mon Sep 17 00:00:00 2001
From: Rasmus <rasmus@gmx.us>
Date: Mon, 20 Apr 2015 15:06:55 +0200
Subject: [PATCH] ox-latex: Use standard LaTeX label prefixes.

* ox-latex.el (org-latex--label): Use standard LaTeX prefixes.
---
 lisp/ox-latex.el | 17 ++++++++++++++++-
 1 file changed, 16 insertions(+), 1 deletion(-)

diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el
index 2727f1c..075f4e4 100644
--- a/lisp/ox-latex.el
+++ b/lisp/ox-latex.el
@@ -1067,7 +1067,22 @@ Eventually, if FULL is non-nil, wrap label within \"\\label{}\"."
 	  (and (or user-label force)
 	       (if (and user-label (plist-get info :latex-prefer-user-labels))
 		   user-label
-		 (org-export-get-reference datum info)))))
+		 (concat (case type
+			   (headline "sec:")
+			   (table "tab:")
+			   (latex-environment
+			    (and (featurep 'texmathp)
+				 (with-temp-buffer
+				   (insert (org-element-property :value datum))
+				   (goto-char (point-min))
+				   (search-forward "}" nil t)
+				   (latex-mode)
+				   (texmathp))
+				 "eq:"))
+			   (paragraph
+			    (when (org-element-property :caption datum)
+			      "fig:")))
+			 (org-export-get-reference datum info))))))
     (cond ((not full) label)
 	  (label (format "\\label{%s}%s"
 			 label
-- 
2.3.5


  reply	other threads:[~2015-04-20 13:13 UTC|newest]

Thread overview: 35+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2015-04-14  9:25 Target and link text normalised to `orgtargetn' Suvayu Ali
2015-04-14 12:08 ` Suvayu Ali
2015-04-14 12:59   ` Rasmus
2015-04-14 13:37     ` Andreas Leha
2015-04-15 22:57   ` Rasmus
2015-04-16  0:18     ` Suvayu Ali
2015-04-16 10:11       ` Rasmus
2015-04-18 21:53         ` Nicolas Goaziou
2015-04-19 12:13           ` Suvayu Ali
2015-04-19 12:57             ` Nicolas Goaziou
2015-04-19 13:24               ` Suvayu Ali
2015-04-19 13:40                 ` Nicolas Goaziou
2015-04-19 13:49                   ` Suvayu Ali
2015-04-19 13:56                     ` Nicolas Goaziou
2015-04-19 14:06                       ` Suvayu Ali
2015-04-19 14:02               ` Rasmus
2015-04-19 14:36                 ` Nicolas Goaziou
2015-04-19 14:55                   ` Rasmus
2015-04-19 15:17                     ` Nicolas Goaziou
2015-04-19 17:16                       ` Rasmus
2015-04-19 18:36                         ` Nicolas Goaziou
2015-04-20  8:55                           ` Rasmus
2015-04-20  9:09                             ` Nicolas Goaziou
2015-04-20  9:25                               ` Rasmus
2015-04-20  9:58                                 ` Nicolas Goaziou
2015-04-20 10:02                                   ` Rasmus
2015-04-20 10:33                                     ` Nicolas Goaziou
2015-04-20 13:13                                       ` Rasmus [this message]
2015-04-20 15:35                                         ` Nicolas Goaziou
2015-04-20 20:11                                           ` Rasmus
2015-04-20 21:03                                             ` Nicolas Goaziou
2015-04-24 13:35                                               ` Rasmus
2015-04-24 19:42                                                 ` Nicolas Goaziou
2015-04-27 22:08                                                   ` Rasmus
2015-04-27 22:15                                                     ` Nicolas Goaziou

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.orgmode.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=87618rc595.fsf@gmx.us \
    --to=rasmus@gmx.us \
    --cc=emacs-orgmode@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).