Hi Nick, thanks for this, but i cannot get it to work ... I have started a vanilla emacs without any init file (emacs -q), have loaded your snippet from a file and evaluated the buffer. Again, the export-handler does not get called. I am running Debian 6.0.4 and my emacs is the one coming with it (see below).
I feel so stupid :-)) Andreas M-x emacs-version says: GNU Emacs 23.2.1 (i486-pc-linux-gnu, GTK+ Version 2.20.0) of 2010-12-12 on raven, modified by Debian M-x org-version says: Org-mode version 6.33x Debian version is 6.0.4 (/etc/debian_version) -----Original Message----- From: Nick Dokos [mailto:nicholas.do...@hp.com] Sent: Fri 2/17/2012 6:31 PM To: Andreas Willig Cc: Thomas S.Dye; emacs-orgmode@gnu.org; nicholas.do...@hp.com Subject: Re: [O] Integration of RefTeX and LaTeX export Andreas Willig <andreas.wil...@canterbury.ac.nz> wrote: > > Hi Thomas, > > thanks for this hint. I have looked at this, the changed / added functions are > below, everything else has not changed. I still have a problem. > > I have created a new link type as you suggested and have consulted google > on how to do it (my emacs-lisp-fu is not good enough to sort out directly what > this function is doing ...). In my understanding the third argument is a > function > that is called when an export process has started and a link is about to be > exported. My first problem is: this handler function is never called, the > error > message that i have inserted below does never appear. I have seen that the > variable "org-link-types" contains the defined link type, and the variable > "org-link-protocols" shows my handler. > > My second problem is that the generated LaTeX output is > "\texttt{\cite{key}}" > but it should simply be "\cite{key}". I would guess that the second problem > is a corollary of the first one ... > > Any ideas? > > Andreas > I'm pretty sure the second function is not quoted properly in your org-add-link-type so it ends up actually getting called at the time of the org-add-link-type is called. Try the following: --8<---------------cut here---------------start------------->8--- (defun rt-follow-handler (path) (message "dummy handler called, path = %s" path) (let ((arg (concat "\\cite{" path "}"))) (reftex-view-crossref arg))) (defun rt-export-handler (path desc format) (message "my handler is called") (cond ((eq format 'latex) (if (or (not desc) (equal 0 (search "rtcite:" desc))) (format "\\cite{%s}" path) (format "\\cite[%s]{%s}" desc path))))) (require 'org) (org-add-link-type "rtcite" (function rt-follow-handler) (function rt-export-handler)) --8<---------------cut here---------------end--------------->8--- By way of explanation: I had this as part of a minimal .emacs and it seems to work more or less OK: I replaced the error call with a message call, because it actually triggered and blew up :-) The rt-export-handler needs tweaking but you 'll know what to do better than I do when you see the latex output. I had to (require 'org) to pick up the definition of org-add-link-type: that seems to be a missing autoload somewhere. And finally I like to quote functions with function, not quote, for compiled-code reasons, but in most cases, it won't make any difference: use quotes if you prefer. Nick > ============================================ > > (defun rt-handler (path) > (message "dummy handler called, path = %s" path) > (let ((arg (concat "\\cite{" path "}"))) > (reftex-view-crossref arg))) > > (org-add-link-type "rtcite" > 'rt-handler > (lambda (path desc format) > (error "my handler is called") > (cond ((eq format 'latex) > (if (or (not desc) (equal 0 (search "rtcite:" > desc))) > (format "\\cite{%s}" path) > (format "\\cite[%s]{%s}" desc path)))))) > > > .... This email may be confidential and subject to legal privilege, it may not reflect the views of the University of Canterbury, and it is not guaranteed to be virus free. If you are not an intended recipient, please notify the sender immediately and erase all copies of the message and any attachments. Please refer to http://www.canterbury.ac.nz/emaildisclaimer for more information.