Re: Re: Org-mode version 6.31trans; Exporting src blocks to LaTeX produces .tex file that fails to compile

[Carsten Dominik <carsten.dominik@gmail.com>]

I have applied the patch, thanks.

- Carsten

On Oct 2, 2009, at 12:45 PM, Chris Gray wrote:

> Carsten Dominik wrote:
>
>> Hi Chris,
>
>> the error was on my side - I did not remove the backend-specific
>> markers after selecting the content.  This is now again done
>> correctly, so your patch should not be needed.  But maybe you
>> want it in anyway, with an empty configuration variable?
>
> Famous last words, but I don't see how it can hurt. :)
>
> Cheers,
> Chris
>
>> - Carsten
>
>> On Oct 2, 2009, at 11:36 AM, Chris Gray wrote:
>
>>> Hi,
>
>>> The problem was with my org-special-blocks contrib package.  The
>>> attached patch fixes it.  Sorry for the noise.
>
>>> Cheers,
>>> Chris
>
>>> commit 4d327b5f1e80ea0e493aa70d09c53042216a1390
>>> Author: Chris Gray <chrismgray@gmail.com>
>>> Date:   Fri Oct 2 11:31:21 2009 +0200
>
>>>   Added a variable to ignore some blocks.
>
>>> 	Modified contrib/lisp/org-special-blocks.el
>>> diff --git a/contrib/lisp/org-special-blocks.el b/contrib/lisp/org-
>>> special-blocks.el
>>> index b8ce4d5..af50b30 100644
>>> --- a/contrib/lisp/org-special-blocks.el
>>>>>> b/contrib/lisp/org-special-blocks.el
>>> @@ -40,17 +40,23 @@
>>> ;; user to add this class to his or her stylesheet if this div is to
>>> ;; mean anything.
>
>>>> (defvar org-special-blocks-ignore-regexp "^\\(LaTeX\\|HTML\\)$"
>>>> "A regexp indicating the names of blocks that should be ignored
>>>> by org-special-blocks.  These blocks will presumably be
>>>> interpreted by other mechanisms.")
>
>>> (defun org-special-blocks-make-special-cookies ()
>>>  "Adds special cookies when #+begin_foo and #+end_foo tokens are
>>> seen.  This is run after a few special cases are taken care of."
>>>  (when (or htmlp latexp)
>>>    (goto-char (point-min))
>>>    (while (re-search-forward "^#\\+\\(begin\\|end\\)_\\(.*\\)$" nil
>>> t)
>>> -      (replace-match
>>> -       (if (equal (downcase (match-string 1)) "begin")
>>> -	   (concat "ORG-" (match-string 2) "-START")
>>> -	 (concat "ORG-" (match-string 2) "-END"))
>>> -       t t))))
>>>>     (unless (string-match-p org-special-blocks-ignore-regexp
>>> (match-string 2))
>>>> 	(replace-match
>>>> 	 (if (equal (downcase (match-string 1)) "begin")
>>>> 	     (concat "ORG-" (match-string 2) "-START")
>>>> 	   (concat "ORG-" (match-string 2) "-END"))
>>>> 	 t t)))))
>
>>> (add-hook 'org-export-preprocess-after-blockquote-hook
>>> 	  'org-special-blocks-make-special-cookies)
>
>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Remember: use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode