emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* re-exporting a web site
@ 2009-05-19 11:36 Eric S Fraga
  2009-05-19 13:17 ` Manish
                   ` (2 more replies)
  0 siblings, 3 replies; 456+ messages in thread
From: Eric S Fraga @ 2009-05-19 11:36 UTC (permalink / raw)
  To: emacs-orgmode

Hello,

I've been through the manual and the faq but just cannot seem to find
the answer to a very simple question:  I need to re-publish
(i.e. re-export) a website that is written in org-mode because I've
changed some of the style information that is "included" by each .org
file.  Although I can force a re-export on individual files (C-u C-c C-e
F), I cannot force a re-export on a "project" (C-c C-e X).  Asking to
export the project simply skips all the unmodified files.  Trying C-u
C-c C-e X gives 

,----
| org-publish-get-base-files: Wrong type argument: stringp, nil
`----

Is this a bug?  I am running the latest org-mode version from git (as of
yesterday evening, in any case) on emacs version 23.0.93.1.

I know I can delete all the files in .org-timestamps/ but this is rather
a sledgehammer approach (as it will cause unnecessary re-publishing for
other projects).

Is there an easy way to re-export a project?

Thanks,
eric

-- 
MC .  -.. --- -  ..-. .-. .- --. .-  .- -  ..- -.-. .-..  .- -.-.  ..- -.-
NL Professor Eric S Fraga, UCL, http://www.homepages.ucl.ac.uk/~ucecesf/
BF >++++++++++[>++++++++++>+++++++++++[<]>-]>++.>++++.<-----.++++++.------.

^ permalink raw reply	[flat|nested] 456+ messages in thread
* LaTeX export bugs?
@ 2009-06-26 13:34 Sébastien Vauban
  2009-07-01 20:21 ` Sébastien Vauban
  2009-07-02  7:19 ` Carsten Dominik
  0 siblings, 2 replies; 456+ messages in thread
From: Sébastien Vauban @ 2009-06-26 13:34 UTC (permalink / raw)
  To: emacs-orgmode-mXXj517/zsQ

Hello,

To make things clear, I love Org-mode (yes, I voted) and its LaTeX export.
More than you can imagine: I now look for avoiding writing any LaTeX document,
and have the export do all the work for me...

BTW, any solution for exporting to a Beamer presentation?  I'd be very very
very interested by anything in that direction. That's the last piece of the
whole puzzle, IMHO.

Though, working more and more in that direction (Org-mode -> LaTeX), I've seen
a couple of weird things that I've compiled into an ECM, for ease of use:

--8<---------------cut here---------------start------------->8---
* Org

  - If you have a level 3 item under a level 1 item, the level 3 doesn't get
    exported to LaTeX. I know this is not a normal situation, but it happens
    when restructuring some text, and you loose it in the exported view...

***** THIS SECTION WILL DISAPPEAR!!

      This text is not exported. Though, I'm not always aware of it, when
      sections are long (spreading over more than one screen page)...

*** Level 2 -- is there a level 3 above?

    - Table with formulas and environment /framed/ :

      The following table will be framed, but TBL formulas do not work
      anymore.

        #+ATTR_LaTeX: align=lrrr
        #+LaTeX: \begin{framed}
        | Code      | \euro{} |  \% | \euro{} |
        |-----------+---------+-----+---------|
        | GSM       |         |     |    0.00 |
        | Internet  |  168.45 | 100 |  168.45 |
        | Matériel  |  295.99 | 100 |  295.99 |
        | Publicité |  214.25 |  33 |   70.70 |
        | Autres    |         |     |    0.00 |
        |-----------+---------+-----+---------|
        | Total     |         |     |  535.14 |
        #+LaTeX: \end{framed}
        #+TBLFM: $4=$2*$3/100;%.2f::@7$4=vsum(@-I..@-II)

      Swapping these two last lines gives LaTeX errors... What's the solution
      for having both: an environment around the table and formulas that work?

      Why do I have to escape the sign symbol as soon as I put LaTeX commands
      (and not BEGIN..END_LaTeX) near it?

    - Hyperlink to other sections: see [[To be referenced]]. Looking in the
      produced LaTeX code, it always link to the current section instead!

    - Quotes are sometimes exported in a weird /fashion/ : see "Industriels,
      et commerçants". And compare with the quotes in the next sample
      ("Industriels et commerçants").

      See as well that /fashion/ is not in italic above. Apparently because of
      the special non-breaking space following the second slash... BTW, a
      possibility would be to translate the "non-breaking space" to its LaTeX
      equivalent syntax (the "tilde" sign).

* To be referenced

  This should be the landing point for the hyperreference above.
--8<---------------cut here---------------end--------------->8---

Once again, thanks to all of you that provide us with those wonderful
features...

Best regards,
  Seb

-- 
Sébastien Vauban



_______________________________________________
Emacs-orgmode mailing list
Remember: use `Reply All' to send replies to the list.
Emacs-orgmode-mXXj517/zsQ@public.gmane.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

^ permalink raw reply	[flat|nested] 456+ messages in thread
* Newbie Questions
@ 2009-07-09 20:37 Andrew M. Nuxoll
  2009-07-09 21:04 ` Brian van den Broek
                   ` (3 more replies)
  0 siblings, 4 replies; 456+ messages in thread
From: Andrew M. Nuxoll @ 2009-07-09 20:37 UTC (permalink / raw)
  To: Emacs-orgmode

Ok, newb here.  I have only been using org-mode for a few days now.  But 
I've been an emacs guy since 1992, I have read the manual and I've also 
searched the archive of this mailing list.  So, forgive me if these 
questions are repeats.  Also, Dominick said you had to be nice to me 
while he was away.

1.  When I view my agenda for a day it displays TODO items twice if they 
are both SCHEDULED and DEADLINEd (a common occurrence for me).  Can this 
be avoided?  Here's a generic example snippet from my agenda:
    Thursday    9 July 2009
      nux:        Scheduled:  TODO [#B] Call Mary :PROJECT::
      nux:        In   1 d.:  TODO [#B] Call Mary :PROJECT::

2.  Once a TODO item has been marked as DONE, it still shows up on my 
agenda.  Can this be avoided? 


Meta-Comments on Questions 1&2:  I realize I have the option of using 
the "ToDo Items" agenda view instead of the day/week agenda view but 
that doesn't work for me because I use the SCHEDULED property as a way 
of selecting a small subset of tasks for the day from a long list of 
TODO items.  I also rely heavily upon repeating tasks to automate most 
of this.  So maybe the solution to #1 and #2 is to use a custom agenda 
of some sort but I don't see an obvious way to create one that does what 
I want.

3.  Once I set a deadline for a task, it'd be nice if the priority would 
increase as the deadline approached.  Ideally the  criteria for 
increasing the priority could be specified via a customizable formula.  
Does this functionality (or anything like it) exist?

Thanks,
:AMN:

^ permalink raw reply	[flat|nested] 456+ messages in thread
* DiTAA error under Ubuntu
@ 2009-08-11 15:18 Sébastien Vauban
  2009-08-11 17:30 ` Nick Dokos
  2009-08-11 19:16 ` Eric S Fraga, Eric S Fraga
  0 siblings, 2 replies; 456+ messages in thread
From: Sébastien Vauban @ 2009-08-11 15:18 UTC (permalink / raw)
  To: emacs-orgmode-mXXj517/zsQ

Hello,

I'm trying to use the DiTAA tool for making easy graphics in a couple of
minutes.

Though, I've this error when exporting to LaTeX:

--8<---------------cut here---------------start------------->8---
[sva@mundaneum] ...texmf/tex/latex>java -jar /home/sva/Downloads/emacs/site-lisp/org-mode/contrib/scripts/ditaa.jar  /tmp/org-ditaa13182XLS archi.png

DiTAA version 0.6b, Copyright (C) 2004 Efstathios Sideris

Using options: 
Reading file: /tmp/org-ditaa13182XLS
Exception in thread "main" java.lang.UnsatisfiedLinkError: Can't load library: /usr/lib/jvm/java-6-openjdk/jre/lib/i386/xawt/libmawt.so
	at java.lang.ClassLoader.loadLibrary(ClassLoader.java:1666)
	at java.lang.Runtime.load0(Runtime.java:787)
	at java.lang.System.load(System.java:1022)
	at java.lang.ClassLoader$NativeLibrary.load(Native Method)
	at java.lang.ClassLoader.loadLibrary0(ClassLoader.java:1767)
	at java.lang.ClassLoader.loadLibrary(ClassLoader.java:1684)
	at java.lang.Runtime.loadLibrary0(Runtime.java:840)
	at java.lang.System.loadLibrary(System.java:1047)
	at sun.security.action.LoadLibraryAction.run(LoadLibraryAction.java:67)
	at sun.security.action.LoadLibraryAction.run(LoadLibraryAction.java:47)
	at java.security.AccessController.doPrivileged(Native Method)
	at java.awt.Toolkit.loadLibraries(Toolkit.java:1614)
	at java.awt.Toolkit.<clinit>(Toolkit.java:1636)
	at java.awt.Color.<clinit>(Color.java:279)
	at org.stathissideris.ascii2image.graphics.DiagramShape.<init>(DiagramShape.java:52)
	at org.stathissideris.ascii2image.graphics.DiagramComponent.createClosedFromBoundaryCells(DiagramComponent.java:82)
	at org.stathissideris.ascii2image.graphics.Diagram.<init>(Diagram.java:320)
	at org.stathissideris.ascii2image.core.CommandLineConverter.main(CommandLineConverter.java:195)
--8<---------------cut here---------------end--------------->8---

I know this is purely related to Java components, but -- being completely
newbie in Java, and being overwhelmed by the impressive long list of possible
packages --, can someone tell me which Ubuntu package I should have to install
to get this working?

I can provide any needed information...

Best regards,
  Seb

PS- In the past, when playing with Java packages, I've already corrupted one
    Java installation, so I wanna do this with care...

-- 
Sébastien Vauban



_______________________________________________
Emacs-orgmode mailing list
Remember: use `Reply All' to send replies to the list.
Emacs-orgmode-mXXj517/zsQ@public.gmane.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

^ permalink raw reply	[flat|nested] 456+ messages in thread
* configure latex fragments preview
@ 2009-09-14 17:49 Nicolas Goaziou
       [not found] ` <n.goaziou@gmail.com>
  0 siblings, 1 reply; 456+ messages in thread
From: Nicolas Goaziou @ 2009-09-14 17:49 UTC (permalink / raw)
  To: Org-mode list

Hello,

This is some minor annoyance, but I would like to find a solution for it
anyway.

The preview image of a latex fragment produced by C-c C-x C-l is so
small that I sometimes find it hard to read.

In order to solve that situation, I modified org-format-latex-header so
that the template for the preview starts with
\documentclass[17pt]{extarticle}.

Though, I find it not quite satisfying as there is little control on
that size (I would like it to be a bit less than 17pt). Thus my question
(eventually) : is it possible to play with dvipng options like scale or
dpi directly, without modifying org.el ?

And if it doesn't exist, could a variable be introduced to fine-tune it ?

As a last note, I think there is a Latex only way to solve all of this,
but I wouldn't like to depends on too much latex packages or tricks.

Regards,

-- 
Nicolas Goaziou

^ permalink raw reply	[flat|nested] 456+ messages in thread
* Changing paragraph setting in Latex export
@ 2010-02-04 17:09 Paul Mead
  2010-02-04 17:39 ` Nick Dokos
  2010-02-04 17:43 ` Eric S Fraga
  0 siblings, 2 replies; 456+ messages in thread
From: Paul Mead @ 2010-02-04 17:09 UTC (permalink / raw)
  To: emacs-orgmode

Hi

I'm trying to export an org-mode file to Latex but I've got a couple of
niggles with the output.

Firstly, there are no spaces between paragraph breaks, so my text looks
horribly bunched up (I'm converting to RTF using latex2rtf, btw)

Secondly, the paragraphs all come out fully justified - this looks
pretty terrible on a fairly wide page (A4 with 1" margins in my case),
and I can't seem to find a way of changing this layout from the org
file.

Can anyone help with this please?

Thanks
Paul

^ permalink raw reply	[flat|nested] 456+ messages in thread
* [babel] confusion about org-confirm-babel-evaluate
@ 2010-08-12 12:53 Eric S Fraga
  2010-08-12 13:44 ` Erik Iverson
  0 siblings, 1 reply; 456+ messages in thread
From: Eric S Fraga @ 2010-08-12 12:53 UTC (permalink / raw)
  To: org-mode mailing list

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

Hello all,

Back from a short holiday and trying to catch up on work... and so I
may have missed something in the org mailing list (although I've
searched...).

I have a large file which includes many babel code blocks (mostly
maxima) that I wish to have evaluated on export.  This works except
that I have to confirm each evaluation (which takes some time).  I
know that org-confirm-babel-evaluate exists so I have put the
following at the top of my org file:

# -*- org-confirm-babel-evaluate: nil; -*-

checking the value of this variable (C-h v org-babel-confirm-evaluate)
gives me:

,----
| org-confirm-babel-evaluate is a variable defined in `ob.el'.
| Its value is nil
| Local in buffer deferred-questions.org; global value is t
| 
|   This variable is a file local variable.
|   This variable is safe as a file local variable if its value
|   satisfies the predicate which is byte-compiled expression.
| 
| Documentation:
| Confirm before evaluation.
| Require confirmation before interactively evaluating code
| blocks in Org-mode buffers.  The default value of this variable
| is t, meaning confirmation is required for any code block
| evaluation.  This variable can be set to nil to inhibit any
| future confirmation requests.  This variable can also be set to a
| [...]
`----

so the value is indeed nil.  However, exporting to PDF, say, still
requires me to confirm each evaluation.  Typing C-c C-c doesn't
require confirmation, however, so the variable does seem to have some
effect.

What am I missing here to avoid having to confirm on export?  The only
variable I have found that combines both export and babel is
org-export-babel-evaluate which is not what I want.

Thanks,
eric

[-- Attachment #2: Type: text/plain, Size: 75 bytes --]

-- 
Eric S Fraga
GnuPG: 8F5C 279D 3907 E14A 5C29  570D C891 93D8 FFFC F67D

[-- Attachment #3: Type: text/plain, Size: 201 bytes --]

_______________________________________________
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

^ permalink raw reply	[flat|nested] 456+ messages in thread
* Bibtex and latex export
@ 2010-09-15 16:00 Rafael Calsaverini
  2010-09-15 19:00 ` Rafael Calsaverini
  0 siblings, 1 reply; 456+ messages in thread
From: Rafael Calsaverini @ 2010-09-15 16:00 UTC (permalink / raw)
  To: emacs-orgmode


[-- Attachment #1.1: Type: text/plain, Size: 1178 bytes --]

Hi there,

I'm trying to use org-mode to compose latex documents and I'm having a
problem with bibtex. When I export to pdf with C-c C-e p, pdflatex runs and
everything works gracefully with respect to the latex code (the output is
even prettier than I used to have patience to do only with latex), but
bibtex isn't called.

I tried to fiddle with org-exp-bibtex, which is nice, but apparently it
don't call bibtex either.

I tried to edit the function that calls pdflatex to include a call to
bibtex, but to be honest I know zero about lisp, so I couldn't even edit a
simple list of commands. :P (I must be the only emacs user in the world that
can't write or read lisp... it would be swell if I could use haskell to
extend emacs instead of lisp :P).

How should I go about automatically including a call to bibtex whenever I
want to export my org document as a pdf?

Thanks for your time, and sorry to bore you with simple questions...
---
Rafael Calsaverini
Dep. de Física Geral, Sala 336
Instituto de Física - Universidade de São Paulo

rafael.calsaverini@gmail.com
http://stoa.usp.br/calsaverini/weblog
CEL: (11) 7525-6222
USP: (11) 3091-6803

[-- Attachment #1.2: Type: text/html, Size: 1465 bytes --]

[-- Attachment #2: Type: text/plain, Size: 201 bytes --]

_______________________________________________
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

^ permalink raw reply	[flat|nested] 456+ messages in thread
* Selective export of table columns
@ 2010-11-23  8:38 Suvayu Ali
  2010-11-23 13:18 ` Nick Dokos
  0 siblings, 1 reply; 456+ messages in thread
From: Suvayu Ali @ 2010-11-23  8:38 UTC (permalink / raw)
  To: emacs

Hi,

I recently was in a situation where I had tables like these,


|    | smear param | \chi^2/DoF  | \chi^2/DoF |
| Sl |  caloE perp | perp before | perp after |
|----+-------------+-------------+------------|
|  3 |       3.008 | 8/13        | 8.3/13     |
|  2 |       3.508 | 8/13        | 8.2/13     |
|  0 |       4.008 | 8/13        | 8.3/13     |
|  4 |       4.508 | 8.1/13      | 8.4/13     |


Now the 1st and 2nd column are something for my reference and I don't
want to export them to my presentation slides. So is there an option for
selective export of table columns? If not can someone give any hints how
I might try to achieve that? I am just learning some lisp, so maybe this
could be a good practice. :)

Thanks for any insights.

-- 
Suvayu

Open source is the future. It sets us free.

^ permalink raw reply	[flat|nested] 456+ messages in thread
* Title page in latex export
@ 2011-03-04 10:05 Suvayu Ali
  2011-03-04 10:48 ` Camille persson
  2011-03-04 15:45 ` Nick Dokos
  0 siblings, 2 replies; 456+ messages in thread
From: Suvayu Ali @ 2011-03-04 10:05 UTC (permalink / raw)
  To: Org mode mailing list

Hi Orgers,

I am trying to write my thesis as per my university style. It requires
I use the \title{Thesis title} command before the

\begin{document}
...
\end{document}

Is there any way to do that? Thanks for any thoughts.

-- 
Suvayu

Open source is the future. It sets us free.

^ permalink raw reply	[flat|nested] 456+ messages in thread
* Future Worg publishing failure :)
@ 2011-03-18  7:35 Nick Dokos
  2011-03-18 10:10 ` Bastien
  0 siblings, 1 reply; 456+ messages in thread
From: Nick Dokos @ 2011-03-18  7:35 UTC (permalink / raw)
  To: emacs-orgmode; +Cc: nicholas.dokos

org-glossary.org contains the following text at one point:

... The number of days is
14.

Current org code takes the 14. as an item in a numbered list.  When
exporting to HTML, this causes an error in org-html-export-list-line -
hence the subject line. It's not a problem right now but it will be when
orgmode.org gets the updated version. I reformatted the line to avoid
the awkward newline, so the future publishing failure will not
happen. I'll let Nicolas worry about what should be done about the
error.

Nick

Org-mode version 7.5 (release_7.5.77.g74268.dirty)

Here's the backtrace of the error:

Debugger entered--Lisp error: (args-out-of-range #("14." 0 3 (fontified t list-item 11895 list-struct ((11895 0 "14." nil nil nil 11899)) list-prevs ((11895)) list-context nil)) 9 10)
  match-string(3 #("14." 0 3 (fontified t list-item 11895 list-struct ((11895 0 "14." nil nil nil 11899)) list-prevs ((11895)) list-context nil)))
  (let* ((checkbox (match-string 3 line)) (desc-tag (or (match-string 4 line) "???")) (body (or (match-string 5 line) "")) (list-beg (org-list-get-list-begin pos struct prevs)) (firstp (= list-beg pos)) (type (funcall get-type list-beg struct prevs)) (counter (let ((count-tmp (org-list-get-counter pos struct))) (cond ((not count-tmp) nil) ((string-match "[A-Za-z]" count-tmp) (- (string-to-char ...) 64)) ((string-match "[0-9]+" count-tmp) count-tmp))))) (when firstp (org-close-par-maybe) (insert (format "<%sl>\n" type))) (insert (cond ((equal type "d") (format "<dt>%s</dt><dd>" desc-tag)) ((and (equal type "o") counter) (format "<li value=\"%s\">" counter)) (t "<li>"))) (when checkbox (setq body (concat (cond ((string-match "X" checkbox) "<code>[X]</code> ") ((string-match " " checkbox) "<c
 ode>[&nbsp;]</code> ") (t "<code>[-]</code> ")) body))) body)
  (cond ((assq pos struct) (string-match (concat "[ 	]*\\(\\S-+[ 	]+\\)" "\\(?:\\[@\\(?:start:\\)?\\([0-9]+\\|[A-Za-z]\\)\\]\\)?" "\\(?:\\(\\[[ X-]\\]\\)[ 	]+\\)?" "\\(?:\\(.*\\)[ 	]+::[ 	]+\\)?" "\\(.*\\)") line) (let* ((checkbox (match-string 3 line)) (desc-tag (or (match-string 4 line) "???")) (body (or (match-string 5 line) "")) (list-beg (org-list-get-list-begin pos struct prevs)) (firstp (= list-beg pos)) (type (funcall get-type list-beg struct prevs)) (counter (let ((count-tmp ...)) (cond (... nil) (... ...) (... count-tmp))))) (when firstp (org-close-par-maybe) (insert (format "<%sl>\n" type))) (insert (cond ((equal type "d") (format "<dt>%s</dt><dd>" desc-tag)) ((and (equal type "o") counter) (format "<li value=\"%s\">" counter)) (t "<li>"))) (when checkbox (setq body (concat (con
 d (... "<code>[X]</code> ") (... "<code>[&nbsp;]</code> ") (t "<code>[-]</code> ")) body))) body)) ((equal "ORG-LIST-END-MARKER" line) (throw (quote nextline) nil)) (t line))
  (let* ((get-type (function (lambda (pos struct prevs) (let ((type ...)) (cond (... "o") (... "d") (t "u")))))) (get-closings (function (lambda (pos) (let (out) (catch (quote exit) (mapc ... struct)) out))))) (mapc (lambda (e) (let* ((lastp (= (org-list-get-last-item e struct prevs) e)) (first-item (org-list-get-list-begin e struct prevs)) (type (funcall get-type first-item struct prevs))) (org-close-par-maybe) (org-close-li type) (when lastp (insert (format "</%sl>\n" type)) (org-open-par)))) (funcall get-closings pos)) (cond ((assq pos struct) (string-match (concat "[ 	]*\\(\\S-+[ 	]+\\)" "\\(?:\\[@\\(?:start:\\)?\\([0-9]+\\|[A-Za-z]\\)\\]\\)?" "\\(?:\\(\\[[ X-]\\]\\)[ 	]+\\)?" "\\(?:\\(.*\\)[ 	]+::[ 	]+\\)?" "\\(.*\\)") line) (let* ((checkbox (match-string 3 line)) (desc-tag (or (match
 -string 4 line) "???")) (body (or (match-string 5 line) "")) (list-beg (org-list-get-list-begin pos struct prevs)) (firstp (= list-beg pos)) (type (funcall get-type list-beg struct prevs)) (
 counter (let (...) (cond ... ... ...)))) (when firstp (org-close-par-maybe) (insert (format "<%sl>\n" type))) (insert (cond ((equal type "d") (format "<dt>%s</dt><dd>" desc-tag)) ((and ... counter) (format "<li value=\"%s\">" counter)) (t "<li>"))) (when checkbox (setq body (concat (cond ... ... ...) body))) body)) ((equal "ORG-LIST-END-MARKER" line) (throw (quote nextline) nil)) (t line)))
  org-html-export-list-line(#("14." 0 3 (fontified t list-item 11895 list-struct ((11895 0 "14." nil nil nil 11899)) list-prevs ((11895)) list-context nil)) 11895 ((11895 0 "14." nil nil nil 11899)) ((11895)))
  (setq line (org-html-export-list-line line (get-text-property 0 (quote list-item) line) (get-text-property 0 (quote list-struct) line) (get-text-property 0 (quote list-prevs) line)))
  (progn (setq line (org-html-export-list-line line (get-text-property 0 (quote list-item) line) (get-text-property 0 (quote list-struct) line) (get-text-property 0 (quote list-prevs) line))))
  (if (get-text-property 0 (quote list-item) line) (progn (setq line (org-html-export-list-line line (get-text-property 0 (quote list-item) line) (get-text-property 0 (quote list-struct) line) (get-text-property 0 (quote list-prevs) line)))))
  (when (get-text-property 0 (quote list-item) line) (setq line (org-html-export-list-line line (get-text-property 0 (quote list-item) line) (get-text-property 0 (quote list-struct) line) (get-text-property 0 (quote list-prevs) line))))
  (cond ((string-match "^\\(\\*+\\)[ 	]+\\(.*\\)" line) (setq level (org-tr-level (- (match-end 1) (match-beginning 1) level-offset)) txt (match-string 2 line)) (if (string-match quote-re0 txt) (setq txt (replace-match "" t t txt))) (if (<= level (max umax umax-toc)) (setq head-count (+ head-count 1))) (setq first-heading-pos (or first-heading-pos (point))) (org-html-level-start level txt umax (and org-export-with-toc (<= level umax)) head-count) (when (string-match quote-re line) (org-close-par-maybe) (insert "<pre>") (setq inquote t))) ((and org-export-with-tables (string-match "^\\([ 	]*\\)\\(|\\|\\+-+\\+\\)" line)) (when (not table-open) (setq table-open t table-buffer nil table-orig-buffer nil)) (setq table-buffer (cons line table-buffer) table-orig-buffer (cons origline table-orig-bu
 ffer)) (when (or (not lines) (not (string-match "^\\([ 	]*\\)\\(|\\|\\+-+\\+\\)" (car lines)))) (setq table-open nil table-buffer (nreverse table-buffer) table-orig-buffer (nreverse table-or
 ig-buffer)) (org-close-par-maybe) (insert (org-format-table-html table-buffer table-orig-buffer)))) (t (when (get-text-property 0 (quote list-item) line) (setq line (org-html-export-list-line line (get-text-property 0 (quote list-item) line) (get-text-property 0 (quote list-struct) line) (get-text-property 0 (quote list-prevs) line)))) (when (string-match "^[ 	]*-\\{5,\\}[ 	]*$" line) (if org-par-open (insert "\n</p>\n<hr/>\n<p>\n") (insert "\n<hr/>\n")) (throw (quote nextline) nil)) (if (string-match "^ [-+*]-\\|^[ 	]*$" line) (org-open-par)) (when org-export-with-footnotes (when (and (boundp (quote footnote-section-tag-regexp)) (string-match (concat "^" footnote-section-tag-regexp) line)) (throw (quote nextline) nil)) (when (string-match "^[ 	]*\\[\\([0-9]+\\)\\]" line) (org-close-par-m
 aybe) (let ((n (match-string 1 line))) (setq org-par-open t line (replace-match (format ... n n n) t t line))))) (cond ((string-match "\\\\\\\\[ 	]*$" line) (setq line (replace-match "<br/>"
  t t line))) (org-export-preserve-breaks (setq line (concat line "<br/>")))) (let ((start 0)) (while (and org-par-open (string-match "\\\\par\\>" line start)) (if (not (get-text-property (match-beginning 0) (quote org-protected) line)) (setq line (replace-match "</p ><p >" t t line))) (setq start (match-end 0)))) (insert line "\n")))
  (catch (quote nextline) (when (and inquote (string-match "^\\*+ " line)) (insert "</pre>\n") (org-open-par) (setq inquote nil)) (when inquote (insert (org-html-protect line) "\n") (throw (quote nextline) nil)) (when (and org-export-with-fixed-width (string-match "^[ 	]*:\\(\\([ 	]\\|$\\)\\(.*\\)\\)" line)) (when (not infixed) (setq infixed t) (org-close-par-maybe) (insert "<pre class=\"example\">\n")) (insert (org-html-protect (match-string 3 line)) "\n") (when (or (not lines) (not (string-match "^[ 	]*:\\(\\([ 	]\\|$\\)\\(.*\\)\\)" (car lines)))) (setq infixed nil) (insert "</pre>\n") (org-open-par)) (throw (quote nextline) nil)) (when (and (get-text-property 0 (quote org-protected) line) (not (< (or (next-single-property-change 0 (quote org-protected) line) 10000) (length line)))) (let
  (par (ind (get-text-property 0 (quote original-indentation) line))) (when (re-search-backward "\\(<p>\\)\\([ 	
\n]*\\)\\=" (- (point) 100) t) (setq par (match-string 1)) (replace-match "\\2
 \n")) (insert line "\n") (while (and lines (or (= (length ...) 0) (not ind) (equal ind (get-text-property 0 ... ...))) (or (= (length ...) 0) (get-text-property 0 (quote org-protected) (car lines)))) (insert (pop lines) "\n")) (and par (insert "<p>\n"))) (throw (quote nextline) nil)) (when (equal "ORG-BLOCKQUOTE-START" line) (org-close-par-maybe) (insert "<blockquote>\n") (org-open-par) (throw (quote nextline) nil)) (when (equal "ORG-BLOCKQUOTE-END" line) (org-close-par-maybe) (insert "\n</blockquote>\n") (org-open-par) (throw (quote nextline) nil)) (when (equal "ORG-VERSE-START" line) (org-close-par-maybe) (insert "\n<p class=\"verse\">\n") (setq org-par-open t) (setq inverse t) (throw (quote nextline) nil)) (when (equal "ORG-VERSE-END" line) (insert "</p>\n") (setq org-par-open nil) (or
 g-open-par) (setq inverse nil) (throw (quote nextline) nil)) (when (equal "ORG-CENTER-START" line) (org-close-par-maybe) (insert "\n<div style=\"text-align: center\">") (org-open-par) (throw
  (quote nextline) nil)) (when (equal "ORG-CENTER-END" line) (org-close-par-maybe) (insert "\n</div>") (org-open-par) (throw (quote nextline) nil)) (run-hooks (quote org-export-html-after-blockquotes-hook)) (when inverse (let ((i (org-get-string-indentation line))) (if (> i 0) (setq line (concat (mapconcat (quote identity) (make-list ... "\\nbsp") "") " " (org-trim line)))) (unless (string-match "\\\\\\\\[ 	]*$" line) (setq line (concat line "\\\\"))))) (setq start 0) (while (string-match "<<<?\\([^<>]*\\)>>>?\\((INVISIBLE)\\)?[ 	]*\n?" line start) (cond ((get-text-property (match-beginning 1) (quote org-protected) line) (setq start (match-end 1))) ((match-end 2) (setq line (replace-match (format "@<a name=\"%s\" id=\"%s\">@</a>" (org-solidify-link-text ...) (org-solidify-link-text ...)) t
  t line))) ((and org-export-with-toc (equal (string-to-char line) 42)) (setq line (replace-match (concat "@<span class=\"target\">" (match-string 1 line) "@</span> ") t t line))) (t (setq li
 ne (replace-match (concat "@<a name=\"" (org-solidify-link-text ...) "\" class=\"target\">" (match-string 1 line) "@</a> ") t t line))))) (setq line (org-html-handle-time-stamps line)) (or (string-match org-table-hline-regexp line) (setq line (org-html-expand line))) (setq line (org-html-handle-links line opt-plist)) (if (and (string-match org-todo-line-regexp line) (match-beginning 2)) (setq line (concat (substring line 0 (match-beginning 2)) "<span class=\"" (if (member (match-string 2 line) org-done-keywords) "done" "todo") " " (match-string 2 line) "\"> " (org-export-html-get-todo-kwd-class-name (match-string 2 line)) "</span>" (substring line (match-end 2))))) (when org-export-with-footnotes (setq start 0) (while (string-match "\\([^* 	].*?\\)\\[\\([0-9]+\\)\\]" line start) (if (get-
 text-property (match-beginning 2) (quote org-protected) line) (setq start (match-end 2)) (let ((n (match-string 2 line)) extra a) (if (setq a (assoc n footref-seen)) (progn (setcdr a ...) (s
 etq extra ...)) (setq extra "") (push (cons n 1) footref-seen)) (setq line (replace-match (format ... ... n extra n n) t t line)))))) (cond ((string-match "^\\(\\*+\\)[ 	]+\\(.*\\)" line) (setq level (org-tr-level (- (match-end 1) (match-beginning 1) level-offset)) txt (match-string 2 line)) (if (string-match quote-re0 txt) (setq txt (replace-match "" t t txt))) (if (<= level (max umax umax-toc)) (setq head-count (+ head-count 1))) (setq first-heading-pos (or first-heading-pos (point))) (org-html-level-start level txt umax (and org-export-with-toc (<= level umax)) head-count) (when (string-match quote-re line) (org-close-par-maybe) (insert "<pre>") (setq inquote t))) ((and org-export-with-tables (string-match "^\\([ 	]*\\)\\(|\\|\\+-+\\+\\)" line)) (when (not table-open) (setq table-open 
 t table-buffer nil table-orig-buffer nil)) (setq table-buffer (cons line table-buffer) table-orig-buffer (cons origline table-orig-buffer)) (when (or (not lines) (not (string-match "^\\([ 	]
 *\\)\\(|\\|\\+-+\\+\\)" (car lines)))) (setq table-open nil table-buffer (nreverse table-buffer) table-orig-buffer (nreverse table-orig-buffer)) (org-close-par-maybe) (insert (org-format-table-html table-buffer table-orig-buffer)))) (t (when (get-text-property 0 (quote list-item) line) (setq line (org-html-export-list-line line (get-text-property 0 (quote list-item) line) (get-text-property 0 (quote list-struct) line) (get-text-property 0 (quote list-prevs) line)))) (when (string-match "^[ 	]*-\\{5,\\}[ 	]*$" line) (if org-par-open (insert "\n</p>\n<hr/>\n<p>\n") (insert "\n<hr/>\n")) (throw (quote nextline) nil)) (if (string-match "^ [-+*]-\\|^[ 	]*$" line) (org-open-par)) (when org-export-with-footnotes (when (and (boundp (quote footnote-section-tag-regexp)) (string-match (concat "^" fo
 otnote-section-tag-regexp) line)) (throw (quote nextline) nil)) (when (string-match "^[ 	]*\\[\\([0-9]+\\)\\]" line) (org-close-par-maybe) (let ((n ...)) (setq org-par-open t line (replace-m
 atch ... t t line))))) (cond ((string-match "\\\\\\\\[ 	]*$" line) (setq line (replace-match "<br/>" t t line))) (org-export-preserve-breaks (setq line (concat line "<br/>")))) (let ((start 0)) (while (and org-par-open (string-match "\\\\par\\>" line start)) (if (not (get-text-property ... ... line)) (setq line (replace-match "</p ><p >" t t line))) (setq start (match-end 0)))) (insert line "\n"))))
  (while (setq line (pop lines) origline line) (catch (quote nextline) (when (and inquote (string-match "^\\*+ " line)) (insert "</pre>\n") (org-open-par) (setq inquote nil)) (when inquote (insert (org-html-protect line) "\n") (throw (quote nextline) nil)) (when (and org-export-with-fixed-width (string-match "^[ 	]*:\\(\\([ 	]\\|$\\)\\(.*\\)\\)" line)) (when (not infixed) (setq infixed t) (org-close-par-maybe) (insert "<pre class=\"example\">\n")) (insert (org-html-protect (match-string 3 line)) "\n") (when (or (not lines) (not (string-match "^[ 	]*:\\(\\([ 	]\\|$\\)\\(.*\\)\\)" (car lines)))) (setq infixed nil) (insert "</pre>\n") (org-open-par)) (throw (quote nextline) nil)) (when (and (get-text-property 0 (quote org-protected) line) (not (< (or (next-single-property-change 0 ... line) 1
 0000) (length line)))) (let (par (ind (get-text-property 0 (quote original-indentation) line))) (when (re-search-backward "\\(<p>\\)\\([ 	
\n]*\\)\\=" (- (point) 100) t) (setq par (match-str
 ing 1)) (replace-match "\\2\n")) (insert line "\n") (while (and lines (or (= ... 0) (not ind) (equal ind ...)) (or (= ... 0) (get-text-property 0 ... ...))) (insert (pop lines) "\n")) (and par (insert "<p>\n"))) (throw (quote nextline) nil)) (when (equal "ORG-BLOCKQUOTE-START" line) (org-close-par-maybe) (insert "<blockquote>\n") (org-open-par) (throw (quote nextline) nil)) (when (equal "ORG-BLOCKQUOTE-END" line) (org-close-par-maybe) (insert "\n</blockquote>\n") (org-open-par) (throw (quote nextline) nil)) (when (equal "ORG-VERSE-START" line) (org-close-par-maybe) (insert "\n<p class=\"verse\">\n") (setq org-par-open t) (setq inverse t) (throw (quote nextline) nil)) (when (equal "ORG-VERSE-END" line) (insert "</p>\n") (setq org-par-open nil) (org-open-par) (setq inverse nil) (throw (quot
 e nextline) nil)) (when (equal "ORG-CENTER-START" line) (org-close-par-maybe) (insert "\n<div style=\"text-align: center\">") (org-open-par) (throw (quote nextline) nil)) (when (equal "ORG-C
 ENTER-END" line) (org-close-par-maybe) (insert "\n</div>") (org-open-par) (throw (quote nextline) nil)) (run-hooks (quote org-export-html-after-blockquotes-hook)) (when inverse (let ((i (org-get-string-indentation line))) (if (> i 0) (setq line (concat (mapconcat ... ... "") " " (org-trim line)))) (unless (string-match "\\\\\\\\[ 	]*$" line) (setq line (concat line "\\\\"))))) (setq start 0) (while (string-match "<<<?\\([^<>]*\\)>>>?\\((INVISIBLE)\\)?[ 	]*\n?" line start) (cond ((get-text-property (match-beginning 1) (quote org-protected) line) (setq start (match-end 1))) ((match-end 2) (setq line (replace-match (format "@<a name=\"%s\" id=\"%s\">@</a>" ... ...) t t line))) ((and org-export-with-toc (equal (string-to-char line) 42)) (setq line (replace-match (concat "@<span class=\"target
 \">" ... "@</span> ") t t line))) (t (setq line (replace-match (concat "@<a name=\"" ... "\" class=\"target\">" ... "@</a> ") t t line))))) (setq line (org-html-handle-time-stamps line)) (or
  (string-match org-table-hline-regexp line) (setq line (org-html-expand line))) (setq line (org-html-handle-links line opt-plist)) (if (and (string-match org-todo-line-regexp line) (match-beginning 2)) (setq line (concat (substring line 0 (match-beginning 2)) "<span class=\"" (if (member (match-string 2 line) org-done-keywords) "done" "todo") " " (match-string 2 line) "\"> " (org-export-html-get-todo-kwd-class-name (match-string 2 line)) "</span>" (substring line (match-end 2))))) (when org-export-with-footnotes (setq start 0) (while (string-match "\\([^* 	].*?\\)\\[\\([0-9]+\\)\\]" line start) (if (get-text-property (match-beginning 2) (quote org-protected) line) (setq start (match-end 2)) (let ((n ...) extra a) (if (setq a ...) (progn ... ...) (setq extra "") (push ... footref-seen)) (s
 etq line (replace-match ... t t line)))))) (cond ((string-match "^\\(\\*+\\)[ 	]+\\(.*\\)" line) (setq level (org-tr-level (- (match-end 1) (match-beginning 1) level-offset)) txt (match-stri
 ng 2 line)) (if (string-match quote-re0 txt) (setq txt (replace-match "" t t txt))) (if (<= level (max umax umax-toc)) (setq head-count (+ head-count 1))) (setq first-heading-pos (or first-heading-pos (point))) (org-html-level-start level txt umax (and org-export-with-toc (<= level umax)) head-count) (when (string-match quote-re line) (org-close-par-maybe) (insert "<pre>") (setq inquote t))) ((and org-export-with-tables (string-match "^\\([ 	]*\\)\\(|\\|\\+-+\\+\\)" line)) (when (not table-open) (setq table-open t table-buffer nil table-orig-buffer nil)) (setq table-buffer (cons line table-buffer) table-orig-buffer (cons origline table-orig-buffer)) (when (or (not lines) (not (string-match "^\\([ 	]*\\)\\(|\\|\\+-+\\+\\)" ...))) (setq table-open nil table-buffer (nreverse table-buffer) ta
 ble-orig-buffer (nreverse table-orig-buffer)) (org-close-par-maybe) (insert (org-format-table-html table-buffer table-orig-buffer)))) (t (when (get-text-property 0 (quote list-item) line) (s
 etq line (org-html-export-list-line line (get-text-property 0 ... line) (get-text-property 0 ... line) (get-text-property 0 ... line)))) (when (string-match "^[ 	]*-\\{5,\\}[ 	]*$" line) (if org-par-open (insert "\n</p>\n<hr/>\n<p>\n") (insert "\n<hr/>\n")) (throw (quote nextline) nil)) (if (string-match "^ [-+*]-\\|^[ 	]*$" line) (org-open-par)) (when org-export-with-footnotes (when (and (boundp ...) (string-match ... line)) (throw (quote nextline) nil)) (when (string-match "^[ 	]*\\[\\([0-9]+\\)\\]" line) (org-close-par-maybe) (let (...) (setq org-par-open t line ...)))) (cond ((string-match "\\\\\\\\[ 	]*$" line) (setq line (replace-match "<br/>" t t line))) (org-export-preserve-breaks (setq line (concat line "<br/>")))) (let ((start 0)) (while (and org-par-open (string-match "\\\\par\
 \>" line start)) (if (not ...) (setq line ...)) (setq start (match-end 0)))) (insert line "\n")))))
  (let ((case-fold-search nil) (org-odd-levels-only odd)) (mapc (lambda (x) (set (make-local-variable (nth 2 x)) (plist-get opt-plist (car x)))) org-export-plist-vars) (setq umax (if arg (prefix-numeric-value arg) org-export-headline-levels)) (setq umax-toc (if (integerp org-export-with-toc) (min org-export-with-toc umax) umax)) (unless body-only (insert (format "%s\n<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"\n               \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n<html xmlns=\"http://www.w3.org/1999/xhtml\"\nlang=\"%s\" xml:lang=\"%s\">\n<head>\n<title>%s</title>\n<meta http-equiv=\"Content-Type\" content=\"text/html;charset=%s\"/>\n<meta name=\"generator\" content=\"Org-mode\"/>\n<meta name=\"generated\" content=\"%s\"/>\n<meta name=\"author\" content=\"%s
 \"/>\n<meta name=\"description\" content=\"%s\"/>\n<meta name=\"keywords\" content=\"%s\"/>\n%s\n%s\n</head>\n<body>\n<div id=\"content\">\n%s\n" (format (or (and (stringp org-export-html-xm
 l-declaration) org-export-html-xml-declaration) (cdr (assoc html-extension org-export-html-xml-declaration)) (cdr (assoc "html" org-export-html-xml-declaration)) "") (or charset "iso-8859-1")) language language title (or charset "iso-8859-1") date author description keywords style mathjax (if (or link-up link-home) (concat (format org-export-html-home/up-format (or link-up link-home) (or link-home link-up)) "\n") ""))) (when (plist-get opt-plist :html-preamble) (let ((html-pre (plist-get opt-plist :html-preamble))) (cond ((stringp html-pre) (insert (format-spec html-pre ...))) ((functionp html-pre) (funcall html-pre opt-plist)) (t (insert (format-spec ... ...))))))) (if (and org-export-with-toc (not body-only)) (progn (push (format "<h%d>%s</h%d>\n" org-export-html-toplevel-hlevel (nth 3 
 lang-words) org-export-html-toplevel-hlevel) thetoc) (push "<div id=\"text-table-of-contents\">\n" thetoc) (push "<ul>\n<li>" thetoc) (setq lines (mapcar (quote (lambda (line) (if ... ...) l
 ine)) lines)) (while (> org-last-level (1- org-min-level)) (setq org-last-level (1- org-last-level)) (push "</li>\n</ul>\n" thetoc)) (push "</div>\n" thetoc) (setq thetoc (if have-headings (nreverse thetoc) nil)))) (setq head-count 0) (org-init-section-numbers) (org-open-par) (while (setq line (pop lines) origline line) (catch (quote nextline) (when (and inquote (string-match "^\\*+ " line)) (insert "</pre>\n") (org-open-par) (setq inquote nil)) (when inquote (insert (org-html-protect line) "\n") (throw (quote nextline) nil)) (when (and org-export-with-fixed-width (string-match "^[ 	]*:\\(\\([ 	]\\|$\\)\\(.*\\)\\)" line)) (when (not infixed) (setq infixed t) (org-close-par-maybe) (insert "<pre class=\"example\">\n")) (insert (org-html-protect (match-string 3 line)) "\n") (when (or (not li
 nes) (not (string-match "^[ 	]*:\\(\\([ 	]\\|$\\)\\(.*\\)\\)" ...))) (setq infixed nil) (insert "</pre>\n") (org-open-par)) (throw (quote nextline) nil)) (when (and (get-text-property 0 (quo
 te org-protected) line) (not (< (or ... 10000) (length line)))) (let (par (ind (get-text-property 0 ... line))) (when (re-search-backward "\\(<p>\\)\\([ 	
\n]*\\)\\=" (- ... 100) t) (setq par (match-string 1)) (replace-match "\\2\n")) (insert line "\n") (while (and lines (or ... ... ...) (or ... ...)) (insert (pop lines) "\n")) (and par (insert "<p>\n"))) (throw (quote nextline) nil)) (when (equal "ORG-BLOCKQUOTE-START" line) (org-close-par-maybe) (insert "<blockquote>\n") (org-open-par) (throw (quote nextline) nil)) (when (equal "ORG-BLOCKQUOTE-END" line) (org-close-par-maybe) (insert "\n</blockquote>\n") (org-open-par) (throw (quote nextline) nil)) (when (equal "ORG-VERSE-START" line) (org-close-par-maybe) (insert "\n<p class=\"verse\">\n") (setq org-par-open t) (setq inverse t) (throw (quote nextline) nil)) (when (equal "ORG-VERSE-END" line) (insert "</p>\n") (setq org-par-open nil) (org-open-par) (setq inverse nil) (throw (quote nextline
 ) nil)) (when (equal "ORG-CENTER-S
 TART" line) (org-close-par-maybe) (insert "\n<div style=\"text-align: center\">") (org-open-par) (throw (quote nextline) nil)) (when (equal "ORG-CENTER-END" line) (org-close-par-maybe) (insert "\n</div>") (org-open-par) (throw (quote nextline) nil)) (run-hooks (quote org-export-html-after-blockquotes-hook)) (when inverse (let ((i (org-get-string-indentation line))) (if (> i 0) (setq line (concat ... " " ...))) (unless (string-match "\\\\\\\\[ 	]*$" line) (setq line (concat line "\\\\"))))) (setq start 0) (while (string-match "<<<?\\([^<>]*\\)>>>?\\((INVISIBLE)\\)?[ 	]*\n?" line start) (cond ((get-text-property (match-beginning 1) (quote org-protected) line) (setq start (match-end 1))) ((match-end 2) (setq line (replace-match ... t t line))) ((and org-export-with-toc (equal ... 42)) (setq 
 line (replace-match ... t t line))) (t (setq line (replace-match ... t t line))))) (setq line (org-html-handle-time-stamps line)) (or (string-match org-table-hline-regexp line) (setq line (o
 rg-html-expand line))) (setq line (org-html-handle-links line opt-plist)) (if (and (string-match org-todo-line-regexp line) (match-beginning 2)) (setq line (concat (substring line 0 (match-beginning 2)) "<span class=\"" (if (member ... org-done-keywords) "done" "todo") " " (match-string 2 line) "\"> " (org-export-html-get-todo-kwd-class-name (match-string 2 line)) "</span>" (substring line (match-end 2))))) (when org-export-with-footnotes (setq start 0) (while (string-match "\\([^* 	].*?\\)\\[\\([0-9]+\\)\\]" line start) (if (get-text-property (match-beginning 2) (quote org-protected) line) (setq start (match-end 2)) (let (... extra a) (if ... ... ... ...) (setq line ...))))) (cond ((string-match "^\\(\\*+\\)[ 	]+\\(.*\\)" line) (setq level (org-tr-level (- ... ... level-offset)) txt (mat
 ch-string 2 line)) (if (string-match quote-re0 txt) (setq txt (replace-match "" t t txt))) (if (<= level (max umax umax-toc)) (setq head-count (+ head-count 1))) (setq first-heading-pos (or 
 first-heading-pos (point))) (org-html-level-start level txt umax (and org-export-with-toc (<= level umax)) head-count) (when (string-match quote-re line) (org-close-par-maybe) (insert "<pre>") (setq inquote t))) ((and org-export-with-tables (string-match "^\\([ 	]*\\)\\(|\\|\\+-+\\+\\)" line)) (when (not table-open) (setq table-open t table-buffer nil table-orig-buffer nil)) (setq table-buffer (cons line table-buffer) table-orig-buffer (cons origline table-orig-buffer)) (when (or (not lines) (not ...)) (setq table-open nil table-buffer (nreverse table-buffer) table-orig-buffer (nreverse table-orig-buffer)) (org-close-par-maybe) (insert (org-format-table-html table-buffer table-orig-buffer)))) (t (when (get-text-property 0 (quote list-item) line) (setq line (org-html-export-list-line line 
 ... ... ...))) (when (string-match "^[ 	]*-\\{5,\\}[ 	]*$" line) (if org-par-open (insert "\n</p>\n<hr/>\n<p>\n") (insert "\n<hr/>\n")) (throw (quote nextline) nil)) (if (string-match "^ [-+
 *]-\\|^[ 	]*$" line) (org-open-par)) (when org-export-with-footnotes (when (and ... ...) (throw ... nil)) (when (string-match "^[ 	]*\\[\\([0-9]+\\)\\]" line) (org-close-par-maybe) (let ... ...))) (cond ((string-match "\\\\\\\\[ 	]*$" line) (setq line ...)) (org-export-preserve-breaks (setq line ...))) (let ((start 0)) (while (and org-par-open ...) (if ... ...) (setq start ...))) (insert line "\n"))))) (when inquote (insert "</pre>\n") (org-open-par)) (org-html-level-start 1 nil umax (and org-export-with-toc (<= level umax)) head-count) (when (and (> umax 0) first-heading-pos) (insert "</div>\n")) (save-excursion (goto-char (point-min)) (while (re-search-forward "<p class=\"footnote\">[^"<p class=\"email\">" email "</p>\n")) (when (plist-get opt-plist :creator-info) (insert "<p class=\"cr
 eator\">" ...)) (insert html-validation-link "\n</div>")) (t (insert "<div id=\"postamble\">\n") (insert (format-spec ... ...)) (insert "</div>")))))) (if org-export-html-with-timestamp (ins
 ert org-export-html-html-helper-timestamp)) (unless body-only (insert "\n</div>\n</body>\n</html>\n")) (unless (plist-get opt-plist :buffer-will-be-killed) (normal-mode) (if (eq major-mode (default-value (quote major-mode))) (html-mode))) (goto-char (point-min)) (when thetoc (if (or (re-search-forward "<p>\\s-*\\[TABLE-OF-CONTENTS\\]\\s-*</p>" nil t) (re-search-forward "\\[TABLE-OF-CONTENTS\\]" nil t)) (progn (goto-char (match-beginning 0)) (replace-match "")) (goto-char first-heading-pos) (when (looking-at "\\s-*</p>") (goto-char (match-end 0)) (insert "\n"))) (insert "<div id=\"table-of-contents\">\n") (let ((beg (point))) (mapc (quote insert) thetoc) (insert "</div>\n") (while (re-search-backward "<li>[ 
\n	]*</li>\n?" beg t) (replace-match "")))) (goto-char (point-min)) (while (re-search-forward "<p>[ 
\n	]*</p>" nil t) (replace-match "")) (goto-char (point-min)) (goto-char (point-min)) (let (beg end n) (while (setq beg (next-single-property-change (point) (quote org-whi
 tespace))) (setq n (get-text-property beg (quote org-whitespace)) end (next-single-property-change beg (quote org-whitespace))) (goto-char beg) (delete-region beg end) (insert (format "<span style=\"visibility:hidden;\">%s</span>" (make-string n 120))))) (goto-char (point-min)) (when (looking-at "\\s-+\n") (replace-match "")) (remove-text-properties (point-min) (point-max) (quote (display t))) (run-hooks (quote org-export-html-final-hook)) (or to-buffer (save-buffer)) (goto-char (point-min)) (or (org-export-push-to-kill-ring "HTML") (message "Exporting... done")) (if (eq to-buffer (quote string)) (prog1 (buffer-substring (point-min) (point-max)) (kill-buffer (current-buffer))) (current-buffer)))
  (let* ((opt-plist (org-export-process-option-filters (org-combine-plists (org-default-export-plist) ext-plist (org-infile-export-plist)))) (body-only (or body-only (plist-get opt-plist :body-only))) (style (concat (if (plist-get opt-plist :style-include-default) org-export-html-style-default) (plist-get opt-plist :style) (plist-get opt-plist :style-extra) "\n" (if (plist-get opt-plist :style-include-scripts) org-export-html-scripts))) (html-extension (plist-get opt-plist :html-extension)) valid thetoc have-headings first-heading-pos (odd org-odd-levels-only) (region-p (org-region-active-p)) (rbeg (and region-p (region-beginning))) (rend (and region-p (region-end))) (subtree-p (if (plist-get opt-plist :ignore-subtree-p) nil (when region-p (save-excursion (goto-char rbeg) (and (org-at-head
 ing-p) (>= ... rend)))))) (level-offset (if subtree-p (save-excursion (goto-char rbeg) (+ (funcall outline-level) (if org-odd-levels-only 1 0))) 0)) (opt-plist (setq org-export-opt-plist (if
  subtree-p (org-export-add-subtree-options opt-plist rbeg) opt-plist))) (org-current-export-dir (or pub-dir (org-export-directory :html opt-plist))) (org-current-export-file buffer-file-name) (level 0) (line "") (origline "") txt todo (umax nil) (umax-toc nil) (filename (if to-buffer nil (expand-file-name (concat (file-name-sans-extension (or ... ...)) "." html-extension) (file-name-as-directory (or pub-dir (org-export-directory :html opt-plist)))))) (current-dir (if buffer-file-name (file-name-directory buffer-file-name) default-directory)) (buffer (if to-buffer (cond ((eq to-buffer (quote string)) (get-buffer-create "*Org HTML Export*")) (t (get-buffer-create to-buffer))) (find-file-noselect filename))) (org-levels-open (make-vector org-level-max nil)) (date (plist-get opt-plist :date))
  (author (plist-get opt-plist :author)) (html-validation-link (or org-export-html-validation-link "")) (title (org-html-expand (or (and subtree-p (org-export-get-title-from-subtree)) (plist-
 get opt-plist :title) (and (not body-only) (not (plist-get opt-plist :skip-before-1st-heading)) (org-export-grab-title-from-buffer)) (and buffer-file-name (file-name-sans-extension (file-name-nondirectory buffer-file-name))) "UNTITLED"))) (link-up (and (plist-get opt-plist :link-up) (string-match "\\S-" (plist-get opt-plist :link-up)) (plist-get opt-plist :link-up))) (link-home (and (plist-get opt-plist :link-home) (string-match "\\S-" (plist-get opt-plist :link-home)) (plist-get opt-plist :link-home))) (dummy (setq opt-plist (plist-put opt-plist :title title))) (html-table-tag (plist-get opt-plist :html-table-tag)) (quote-re0 (concat "^[ 	]*" org-quote-string "\\>")) (quote-re (concat "^\\(\\*+\\)\\([ 	]+" org-quote-string "\\>\\)")) (inquote nil) (infixed nil) (inverse nil) (email (plis
 t-get opt-plist :email)) (language (plist-get opt-plist :language)) (keywords (plist-get opt-plist :keywords)) (description (plist-get opt-plist :description)) (lang-words nil) (head-count 0
 ) cnt (start 0) (coding-system (and (boundp (quote buffer-file-coding-system)) buffer-file-coding-system)) ...) (let ((inhibit-read-only t)) (org-unmodified (remove-text-properties (point-min) (point-max) (quote (:org-license-to-kill t))))) (message "Exporting...") (setq org-min-level (org-get-min-level lines level-offset)) (setq org-last-level org-min-level) (org-init-section-numbers) (cond ((and date (string-match "%" date)) (setq date (format-time-string date))) (date) (t (setq date (format-time-string "%Y-%m-%d %T %Z")))) (setq lang-words (or (assoc language org-export-language-setup) (assoc "en" org-export-language-setup))) (set-buffer buffer) (let ((inhibit-read-only t)) (erase-buffer)) (fundamental-mode) (org-install-letbind) (and (fboundp (quote set-buffer-file-coding-system)) (se
 t-buffer-file-coding-system coding-system-for-write)) (let ((case-fold-search nil) (org-odd-levels-only odd)) (mapc (lambda (x) (set (make-local-variable (nth 2 x)) (plist-get opt-plist (car
  x)))) org-export-plist-vars) (setq umax (if arg (prefix-numeric-value arg) org-export-headline-levels)) (setq umax-toc (if (integerp org-export-with-toc) (min org-export-with-toc umax) umax)) (unless body-only (insert (format "%s\n<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"\n               \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n<html xmlns=\"http://www.w3.org/1999/xhtml\"\nlang=\"%s\" xml:lang=\"%s\">\n<head>\n<title>%s</title>\n<meta http-equiv=\"Content-Type\" content=\"text/html;charset=%s\"/>\n<meta name=\"generator\" content=\"Org-mode\"/>\n<meta name=\"generated\" content=\"%s\"/>\n<meta name=\"author\" content=\"%s\"/>\n<meta name=\"description\" content=\"%s\"/>\n<meta name=\"keywords\" content=\"%s\"/>\n%s\n%s\n</head>\n<body>\n<div id=\"content\"
 >\n%s\n" (format (or (and ... org-export-html-xml-declaration) (cdr ...) (cdr ...) "") (or charset "iso-8859-1")) language language title (or charset "iso-8859-1") date author description ke
 ywords style mathjax (if (or link-up link-home) (concat (format org-export-html-home/up-format ... ...) "\n") ""))) (when (plist-get opt-plist :html-preamble) (let ((html-pre (plist-get opt-plist :html-preamble))) (cond ((stringp html-pre) (insert ...)) ((functionp html-pre) (funcall html-pre opt-plist)) (t (insert ...)))))) (if (and org-export-with-toc (not body-only)) (progn (push (format "<h%d>%s</h%d>\n" org-export-html-toplevel-hlevel (nth 3 lang-words) org-export-html-toplevel-hlevel) thetoc) (push "<div id=\"text-table-of-contents\">\n" thetoc) (push "<ul>\n<li>" thetoc) (setq lines (mapcar (quote (lambda ... ... line)) lines)) (while (> org-last-level (1- org-min-level)) (setq org-last-level (1- org-last-level)) (push "</li>\n</ul>\n" thetoc)) (push "</div>\n" thetoc) (setq thetoc
  (if have-headings (nreverse thetoc) nil)))) (setq head-count 0) (org-init-section-numbers) (org-open-par) (while (setq line (pop lines) origline line) (catch (quote nextline) (when (and inq
 uote (string-match "^\\*+ " line)) (insert "</pre>\n") (org-open-par) (setq inquote nil)) (when inquote (insert (org-html-protect line) "\n") (throw (quote nextline) nil)) (when (and org-export-with-fixed-width (string-match "^[ 	]*:\\(\\([ 	]\\|$\\)\\(.*\\)\\)" line)) (when (not infixed) (setq infixed t) (org-close-par-maybe) (insert "<pre class=\"example\">\n")) (insert (org-html-protect (match-string 3 line)) "\n") (when (or (not lines) (not ...)) (setq infixed nil) (insert "</pre>\n") (org-open-par)) (throw (quote nextline) nil)) (when (and (get-text-property 0 (quote org-protected) line) (not (< ... ...))) (let (par (ind ...)) (when (re-search-backward "\\(<p>\\)\\([ 	
\n]*\\)\\=" ... t) (setq par ...) (replace-match "\\2\n")) (insert line "\n") (while (and lines ... ...) (insert ... "\n")) (and par (insert "<p>\n"))) (throw (quote nextline) nil)) (when (equal "ORG-BLOCKQUOTE-START" line) (org-close-par-maybe) (insert "<blockquote>\n") (org-open-par) (throw (quote nextl
 ine) nil)) (when (equal "ORG-BLOCKQUOTE-END" line) (org-close-par-maybe) (insert "\n</blockquote>\n") (org-open-par) (throw (quote nextline) nil)) (when (equal "ORG-VERSE-START" line) (org-close-par-maybe) (insert "\n<p class=\"verse\">\n") (setq org-par-open t) (setq inverse t) (throw (quote nextline) nil)) (when (equal "ORG-VERSE-END" line) (insert "</p>\n") (setq org-par-open nil) (org-open-par) (setq inverse nil) (throw (quote nextline) nil)) (when (equal "ORG-CENTER-START" line) (org-close-par-maybe) (insert "\n<div style=\"text-align: center\">") (org-open-par) (throw (quote nextline) nil)) (when (equal "ORG-CENTER-END" line) (org-close-par-maybe) (insert "\n</div>") (org-open-par) (throw (quote nextline) nil)) (run-hooks (quote org-export-html-after-blockquotes-hook)) (when inverse
  (let ((i ...)) (if (> i 0) (setq line ...)) (unless (string-match "\\\\\\\\[ 	]*$" line) (setq line ...)))) (setq start 0) (while (string-match "<<<?\\([^<>]*\\)>>>?\\((INVISIBLE)\\)?[ 	]*\
 n?" line start) (cond ((get-text-property ... ... line) (setq start ...)) ((match-end 2) (setq line ...)) ((and org-export-with-toc ...) (setq line ...)) (t (setq line ...)))) (setq line (org-html-handle-time-stamps line)) (or (string-match org-table-hline-regexp line) (setq line (org-html-expand line))) (setq line (org-html-handle-links line opt-plist)) (if (and (string-match org-todo-line-regexp line) (match-beginning 2)) (setq line (concat (substring line 0 ...) "<span class=\"" (if ... "done" "todo") " " (match-string 2 line) "\"> " (org-export-html-get-todo-kwd-class-name ...) "</span>" (substring line ...)))) (when org-export-with-footnotes (setq start 0) (while (string-match "\\([^* 	].*?\\)\\[\\([0-9]+\\)\\]" line start) (if (get-text-property ... ... line) (setq start ...) (let .
 .. ... ...)))) (cond ((string-match "^\\(\\*+\\)[ 	]+\\(.*\\)" line) (setq level (org-tr-level ...) txt (match-string 2 line)) (if (string-match quote-re0 txt) (setq txt ...)) (if (<= level 
 ...) (setq head-count ...)) (setq first-heading-pos (or first-heading-pos ...)) (org-html-level-start level txt umax (and org-export-with-toc ...) head-count) (when (string-match quote-re line) (org-close-par-maybe) (insert "<pre>") (setq inquote t))) ((and org-export-with-tables (string-match "^\\([ 	]*\\)\\(|\\|\\+-+\\+\\)" line)) (when (not table-open) (setq table-open t table-buffer nil table-orig-buffer nil)) (setq table-buffer (cons line table-buffer) table-orig-buffer (cons origline table-orig-buffer)) (when (or ... ...) (setq table-open nil table-buffer ... table-orig-buffer ...) (org-close-par-maybe) (insert ...))) (t (when (get-text-property 0 ... line) (setq line ...)) (when (string-match "^[ 	]*-\\{5,\\}[ 	]*$" line) (if org-par-open ... ...) (throw ... nil)) (if (string-match
  "^ [-+*]-\\|^[ 	]*$" line) (org-open-par)) (when org-export-with-footnotes (when ... ...) (when ... ... ...)) (cond (... ...) (org-export-preserve-breaks ...)) (let (...) (while ... ... ...
 )) (insert line "\n"))))) (when inquote (insert "</pre>\n") (org-open-par)) (org-html-level-start 1 nil umax (and org-export-with-toc (<= level umax)) head-count) (when (and (> umax 0) first-heading-pos) (insert "</div>\n")) (save-excursion (goto-char (point-min)) (while (re-search-forward "<p class=\"footnote\">[^footnotes (insert (format org-export-html-footnotes-section (nth 4 lang-words) (mapconcat (quote identity) (nreverse footnotes) "\n")) "\n")) (let ((bib (org-export-html-get-bibliography))) (when bib (insert "\n" bib "\n"))) (unless body-only (let ((html-post (plist-get opt-plist :html-postamble)) (email (mapconcat (lambda ... ...) (split-string email ",+ *") ", ")) (creator-info (concat "Org version " org-version " with Emacs version " (number-to-string emacs-major-version)))) 
 (when (plist-get opt-plist :html-postamble) (cond ((stringp html-post) (insert "<div id=\"postamble\">\n") (insert ...) (insert "</div>")) ((functionp html-post) (funcall html-post opt-plist
 )) ((eq html-post ...) (insert "<div id=\"postamble\">\n") (when ... ...) (when ... ...) (when ... ...) (when ... ...) (insert html-validation-link "\n</div>")) (t (insert "<div id=\"postamble\">\n") (insert ...) (insert "</div>")))))) (if org-export-html-with-timestamp (insert org-export-html-html-helper-timestamp)) (unless body-only (insert "\n</div>\n</body>\n</html>\n")) (unless (plist-get opt-plist :buffer-will-be-killed) (normal-mode) (if (eq major-mode (default-value (quote major-mode))) (html-mode))) (goto-char (point-min)) (when thetoc (if (or (re-search-forward "<p>\\s-*\\[TABLE-OF-CONTENTS\\]\\s-*</p>" nil t) (re-search-forward "\\[TABLE-OF-CONTENTS\\]" nil t)) (progn (goto-char (match-beginning 0)) (replace-match "")) (goto-char first-heading-pos) (when (looking-at "\\s-*</p>"
 ) (goto-char (match-end 0)) (insert "\n"))) (insert "<div id=\"table-of-contents\">\n") (let ((beg (point))) (mapc (quote insert) thetoc) (insert "</div>\n") (while (re-search-backward "<li>
 [ 
\n	]*</li>\n?" beg t) (replace-match "")))) (goto-char (point-min)) (while (re-search-forward "<p>[ 
\n	]*</p>" nil t) (replace-match "")) (goto-char (point-min)) (goto-char (point-min)) (let (beg end n) (while (setq beg (next-single-property-change (point) (quote org-whitespace))) (setq n (get-text-property beg (quote org-whitespace)) end (next-single-property-change beg (quote org-whitespace))) (goto-char beg) (delete-region beg end) (insert (format "<span style=\"visibility:hidden;\">%s</span>" (make-string n 120))))) (goto-char (point-min)) (when (looking-at "\\s-+\n") (replace-match "")) (remove-text-properties (point-min) (point-max) (quote (display t))) (run-hooks (quote org-export-html-final-hook)) (or to-buffer (save-buffer)) (goto-char (point-min)) (or (org-export-push-to-kill-ring "HTML") (message "Exporting... done")) (if (eq to-buffer (quote string)) (prog1 (buffer-substring 
 (point-min) (point-max)) (kill-buffer (current-buffer))) (current-buffer))))
  org-export-as-html(nil)
  call-interactively(org-export-as-html)
  org-export(nil)
  call-interactively(org-export nil nil)

^ permalink raw reply	[flat|nested] 456+ messages in thread
* orgmode BEAMER scaling image
@ 2011-03-24 16:35 Gilberto
  2011-03-24 17:26 ` John Hendy
  2011-03-24 19:18 ` Eric S Fraga
  0 siblings, 2 replies; 456+ messages in thread
From: Gilberto @ 2011-03-24 16:35 UTC (permalink / raw)
  To: emacs-orgmode

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

In his org-mode beamer tutorial, Eric Fraga (very useful tutorial BTW, thanks) gives an example of using an image, and writes

> I have added an attribute to the image to tell LaTeX to scale the image to the full width of the column.


Can I add a similar attribute to my images without having to tweak the .tex file? In other words, can I directly do that in org beamer mode?

Gilberto Conde
ah.gilberto.c@gmail.com
___________________________________




[-- Attachment #2: Type: text/html, Size: 2189 bytes --]

^ permalink raw reply	[flat|nested] 456+ messages in thread
* Outlook replacement
@ 2011-03-25 18:56 Henri-Paul Indiogine
  2011-03-25 20:57 ` Chris Malone
  2011-03-25 21:06 ` John Hendy
  0 siblings, 2 replies; 456+ messages in thread
From: Henri-Paul Indiogine @ 2011-03-25 18:56 UTC (permalink / raw)
  To: emacs-orgmode

Greetings!

A few days ago I noticed a headline somewhere, possibly
http://linuxtoday.com or http://lxer.com, that read "an Outlook
replacement for Linux".

Then I thought, I have an Emacs gnus frame next to a frame with my
agenda.org.   I guess that is my "Outlook replacement".  Also, regularly I
export my agenda to Google Calendar.   So, I am not missing anything
from Outlook.  Yes, I know, I can not schedule appointments in a
corporate setting, but I work more or less alone.

Best,
Henri-Paul



-- 
Henri-Paul Indiogine
Email: hindiogine@gmail.com
Running: Ubuntu Linux 10.10, Emacs 24.0.50.1, org-mode 7.4

^ permalink raw reply	[flat|nested] 456+ messages in thread
* [Link] Missing referenced page in Org-beamer
@ 2011-03-25 21:26 Sébastien Vauban
  2011-03-25 23:39 ` Eric S Fraga
  0 siblings, 1 reply; 456+ messages in thread
From: Sébastien Vauban @ 2011-03-25 21:26 UTC (permalink / raw)
  To: emacs-orgmode-mXXj517/zsQ

Hi Eric,

Check this out in section 4.3 of
http://orgmode.org/worg/org-tutorials/org-beamer/tutorial.html
(last line).

Best regards,
  Seb

-- 
Sébastien Vauban

^ permalink raw reply	[flat|nested] 456+ messages in thread
* How to display a diary entry in agenda week view only "today"
@ 2011-04-11  6:52 Rainer Stengele
  2011-04-11  8:36 ` Suvayu Ali
  0 siblings, 1 reply; 456+ messages in thread
From: Rainer Stengele @ 2011-04-11  6:52 UTC (permalink / raw)
  To: emacs-orgmode

Hi!

In one of my org agenda files I have

#+CATEGORY: Sunrise
&%%(diary-sunrise-sunset)

Now, when I am in weekly agenda view the sunrise-sunset shows under every day.
This is kind of too much line noise and distracting for me - I would like to only see the entry for "today".

Is there a way to restrict the display of such a diary entry in the weekly agenda view to only today?

Regards,
Rainer

^ permalink raw reply	[flat|nested] 456+ messages in thread
* C-c - broken
@ 2011-06-06 13:44 Marvin Doyley
  2011-06-06 17:15 ` Nicolas Goaziou
                   ` (2 more replies)
  0 siblings, 3 replies; 456+ messages in thread
From: Marvin Doyley @ 2011-06-06 13:44 UTC (permalink / raw)
  To: emacs-orgmode

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

Hi there,

I use to use C-c - to convert headlines to plain list, but for some reason
when I do this it tries to make a table of content, see below

TABLE-OF-CONTENTS on ~/Documents/General/O/org/planner.org
SPC=view TAB=goto RET=goto+hide [q]uit [r]escan [l]abels [f]ollow [x]r
[?]Help
------------------------------------------------------------------------------


Does anybody now how to fix this (i.e., get it to behave the old way)

Thanks
M

[-- Attachment #2: Type: text/html, Size: 523 bytes --]

^ permalink raw reply	[flat|nested] 456+ messages in thread
* latex checkboxes
@ 2011-06-16 22:09 Skip Collins
  2011-06-16 22:52 ` Nick Dokos
  2011-06-16 23:23 ` Thomas S. Dye
  0 siblings, 2 replies; 456+ messages in thread
From: Skip Collins @ 2011-06-16 22:09 UTC (permalink / raw)
  To: emacs-orgmode

There is a couple of problems with the way checkboxes are typeset in LaTeX.

- [ ] a
- [X] b
- [-] c

is translated to the LaTeX

\begin{itemize}
\item $\Box$ a
\item $\boxtimes$ b
\item $\boxminus$ c
\end{itemize}

The first problem is that \Box is not the same size as \boxtimes or \boxminus .
The correct symbol to use from the amssymb package is \square which
matches the other two symbols.

Another problem is that these symbols were intended to be mathematical
binary operators, and are therefore rather small for the purposes of a
checkbox. I suggest that LaTeX output could be modified to something
like:

\setbox0=\hbox{\LARGE$\square$}
\begin{itemize}
\item {\parbox[][][c]{\wd0}{\LARGE$\square$}} a
\item {\parbox[][][c]{\wd0}{\LARGE$\boxtimes$}} b
\item {\parbox[][][c]{\wd0}{\LARGE$\boxminus$}} c
\end{itemize}

The parbox ensures that the checkbox is nicely centered with the first
line of text.

Another nice-to-have feature would be to use the checkbox as a label
for list items in non-enumerated lists. Currently, the list bullet
appears as visual clutter next to the checkbox.

^ permalink raw reply	[flat|nested] 456+ messages in thread
* Problem with BEGIN_SRC export-as-latex and FORTRAN code
@ 2011-06-21 13:33 Nick Papior Andersen
  2011-06-21 15:26 ` [bug] Latex export of lists (was Re: Problem with BEGIN_SRC export-as-latex and FORTRAN code) Eric S Fraga
  2011-06-21 16:51 ` Problem with BEGIN_SRC export-as-latex and FORTRAN code Eric Schulte
  0 siblings, 2 replies; 456+ messages in thread
From: Nick Papior Andersen @ 2011-06-21 13:33 UTC (permalink / raw)
  To: emacs-orgmode


[-- Attachment #1.1: Type: text/plain, Size: 787 bytes --]

Hi all

I have attached a sample which produces a wrong output in my org-mode
installation. Both the output TeX file and the org file are attached.

The wrong doing happens when i do "org-export-as-latex". The output tex file
has removed a certain string length (i counted 23) and inserted some from
the code below as a description in the item field (which it shouldn't do as
we are in an enumerate environment).

I have version 7.01g, i have had troubles to install the newest 7.5 org-mode
version so i cant say if it does the same there. But i have searched the
changes list for export on latex source. It didn't seem to have had any
changes as far as this bug.

I know that i probably shouldn't denote FORTRAN code as C code, but is that
internally differentiated?

Kind regards Nick

[-- Attachment #1.2: Type: text/html, Size: 975 bytes --]

[-- Attachment #2: latex-org-export-bug.zip --]
[-- Type: application/zip, Size: 1113 bytes --]

^ permalink raw reply	[flat|nested] 456+ messages in thread
* Problem with autoloads
@ 2011-06-26 20:14 suvayu ali
  2011-06-27 16:51 ` Michael Markert
  0 siblings, 1 reply; 456+ messages in thread
From: suvayu ali @ 2011-06-26 20:14 UTC (permalink / raw)
  To: org-mode mailing list

Hi,

After I updated yesterday I have been having this problem. This is how
I compile:

$ make cleanall && make all

and I load org from my init file like this:

;; the org repo is at ~/build/org-mode
(add-to-list 'load-path (expand-file-name "~/build/org-mode/lisp"))
(add-to-list 'load-path (expand-file-name "~/build/org-mode/contrib/lisp"))

(require 'org-install)

Now every time something needs to be loaded say org-latex during latex export
or org-table when turning on orgtbl minor mode, I get errors like these:

(file-error "Cannot open load file" "lisp/org")

I see lisp/org-install.el has autoloads like these:

(autoload 'org-mode "lisp/org" ...)

I have faced this once earlier, not sure how I resolved it back then. What am
I doing wrong here?

--
Suvayu

Open source is the future. It sets us free.

^ permalink raw reply	[flat|nested] 456+ messages in thread