Re: Re: Bug: subtree export fails with src block

Re: Re: Bug: subtree export fails with src block

[Giovanni Moretti]

I'm just starting with Babel and have been puzzled about why one file
worked and another didn't.

I have been playing in a new file without any headers at all (no lines
starting with '*') and while I could execute the code in the buffer,
exporting to HTML always failed with:

   No such file: c:/org/babel-python-test.org::

When searching, I found this thread and wondered if the heading were
important. It turns out they are. In the block below, exporting to HTML
fails if the first line isn't a heading.

This seems like a clue ...

Cheers and thanks
Giovanni

PS: the BOTH option for :export is hard to find - only :export none is in
the intro page.

===============================
* Python Babel test

Now let's see what happens:

#+begin_src python :results output :exports both
print "Babel"
limits = [1,2,3,4,5,6,7,8,9,10]

for i in limits:
  print "Hello" * i
#+end_src python
================================

Re: Re: Bug: subtree export fails with src block

[Eric Schulte]

Hi Giovanni,

I'm unable to reproduce your bug.  I can successfully export the
following to html w/o issue.

--8<---------------cut here---------------start------------->8---
Now let's see what happens:

#+begin_src python :results output :exports both
print "Babel"
limits = [1,2,3,4,5,6,7,8,9,10]

for i in limits:
  print "Hello" * i
#+end_src python
--8<---------------cut here---------------end--------------->8---

Are you using the latest version of Org-mode?  Could you try exporting
the above and see if it works for you.

some more comments inline below.

"Giovanni Moretti" <Giovanni@reflections.co.nz> writes:

> I'm just starting with Babel and have been puzzled about why one file
> worked and another didn't.
>
> I have been playing in a new file without any headers at all (no lines
> starting with '*') and while I could execute the code in the buffer,
> exporting to HTML always failed with:
>
>    No such file: c:/org/babel-python-test.org::
>

Hmm, it looks like it's trying to find a file with "::" attached to the
end which is probably the source of the issue.  I wonder if this is a
windows specific problem?

>
> When searching, I found this thread and wondered if the heading were
> important. It turns out they are. In the block below, exporting to HTML
> fails if the first line isn't a heading.
>
> This seems like a clue ...
>
> Cheers and thanks
> Giovanni
>
> PS: the BOTH option for :export is hard to find - only :export none is in
> the intro page.
>

The documentation [1] is the place to look for header arguments and
their usage, but I suppose we should mention that more explicitly (at
all?)  from the introduction page.

Best -- Eric

>
> ===============================
> * Python Babel test
>
> Now let's see what happens:
>
> #+begin_src python :results output :exports both
> print "Babel"
> limits = [1,2,3,4,5,6,7,8,9,10]
>
> for i in limits:
>   print "Hello" * i
> #+end_src python
> ================================
>
>
> _______________________________________________
> 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

Footnotes: 
[1]  http://orgmode.org/manual/Working-With-Source-Code.html#Working-With-Source-Code

Re: Re: Bug: subtree export fails with src block

[Eric Schulte]

"Eric Schulte" <schulte.eric@gmail.com> writes:

[...]
>
> "Giovanni Moretti" <Giovanni@reflections.co.nz> writes:
>
>> I'm just starting with Babel and have been puzzled about why one file
>> worked and another didn't.
>>
>> I have been playing in a new file without any headers at all (no lines
>> starting with '*') and while I could execute the code in the buffer,
>> exporting to HTML always failed with:
>>
>>    No such file: c:/org/babel-python-test.org::
>>
>
> Hmm, it looks like it's trying to find a file with "::" attached to the
> end which is probably the source of the issue.  I wonder if this is a
> windows specific problem?
>

a-ha,

I just noticed that while my test file "python.org" was exporting w/o
problem, it was opening a "python.org::" buffer in the process, so maybe
the reason this throws errors for you and not for me is just Unix's more
permissive file names.

I've just pushed up a change to the Babel exporter that will only concat
the "::" to the end of a file name, where there is actually a heading to
following it.  Hopefully this will fix the error you described, please
let me know if that is not the case.

Best -- Eric

Re: Re: Bug: subtree export fails with src block

[Jörg Hagmann]

  This might be the same problem I discussed recently?
See this thread: 
http://thread.gmane.org/gmane.emacs.orgmode/31241/focus=31289

Jörg

On 10/4/10 3:48 PM, Eric Schulte wrote:
> "Eric Schulte"<schulte.eric@gmail.com>  writes:
>
> [...]
>> "Giovanni Moretti"<Giovanni@reflections.co.nz>  writes:
>>
>>> I'm just starting with Babel and have been puzzled about why one file
>>> worked and another didn't.
>>>
>>> I have been playing in a new file without any headers at all (no lines
>>> starting with '*') and while I could execute the code in the buffer,
>>> exporting to HTML always failed with:
>>>
>>>     No such file: c:/org/babel-python-test.org::
>>>
>> Hmm, it looks like it's trying to find a file with "::" attached to the
>> end which is probably the source of the issue.  I wonder if this is a
>> windows specific problem?
>>
> a-ha,
>
> I just noticed that while my test file "python.org" was exporting w/o
> problem, it was opening a "python.org::" buffer in the process, so maybe
> the reason this throws errors for you and not for me is just Unix's more
> permissive file names.
>
> I've just pushed up a change to the Babel exporter that will only concat
> the "::" to the end of a file name, where there is actually a heading to
> following it.  Hopefully this will fix the error you described, please
> let me know if that is not the case.
>
> Best -- Eric
>
> _______________________________________________
> 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

Re: Re: Bug: subtree export fails with src block

[Eric Schulte]

Similar,

I think this thread is also related
http://thread.gmane.org/gmane.emacs.orgmode/31312/focus=31392

either way the issue should be fixed in the latest Org-mode.  Please let
me know if that is not the case.

Best -- Eric

Jörg Hagmann <joerg.hagmann@unibas.ch> writes:

>  This might be the same problem I discussed recently?
> See this thread:
> http://thread.gmane.org/gmane.emacs.orgmode/31241/focus=31289
>
> Jörg
>
> On 10/4/10 3:48 PM, Eric Schulte wrote:
>> "Eric Schulte"<schulte.eric@gmail.com>  writes:
>>
>> [...]
>>> "Giovanni Moretti"<Giovanni@reflections.co.nz>  writes:
>>>
>>>> I'm just starting with Babel and have been puzzled about why one file
>>>> worked and another didn't.
>>>>
>>>> I have been playing in a new file without any headers at all (no lines
>>>> starting with '*') and while I could execute the code in the buffer,
>>>> exporting to HTML always failed with:
>>>>
>>>>     No such file: c:/org/babel-python-test.org::
>>>>
>>> Hmm, it looks like it's trying to find a file with "::" attached to the
>>> end which is probably the source of the issue.  I wonder if this is a
>>> windows specific problem?
>>>
>> a-ha,
>>
>> I just noticed that while my test file "python.org" was exporting w/o
>> problem, it was opening a "python.org::" buffer in the process, so maybe
>> the reason this throws errors for you and not for me is just Unix's more
>> permissive file names.
>>
>> I've just pushed up a change to the Babel exporter that will only concat
>> the "::" to the end of a file name, where there is actually a heading to
>> following it.  Hopefully this will fix the error you described, please
>> let me know if that is not the case.
>>
>> Best -- Eric
>>
>> _______________________________________________
>> 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

Re: Re: Bug: subtree export fails with src block

[Jörg Hagmann]

  On 10/4/10 5:06 PM, Eric Schulte wrote:
> Similar,
>
> I think this thread is also related
> http://thread.gmane.org/gmane.emacs.orgmode/31312/focus=31392
>
> either way the issue should be fixed in the latest Org-mode.  Please let
> me know if that is not the case.
Yes, it works with today's org version.
Many thanks!
Jörg
> Best -- Eric
>
> Jörg Hagmann<joerg.hagmann@unibas.ch>  writes:
>
>>   This might be the same problem I discussed recently?
>> See this thread:
>> http://thread.gmane.org/gmane.emacs.orgmode/31241/focus=31289
>>
>> Jörg
>>
>> On 10/4/10 3:48 PM, Eric Schulte wrote:
>>> "Eric Schulte"<schulte.eric@gmail.com>   writes:
>>>
>>> [...]
>>>> "Giovanni Moretti"<Giovanni@reflections.co.nz>   writes:
>>>>
>>>>> I'm just starting with Babel and have been puzzled about why one file
>>>>> worked and another didn't.
>>>>>
>>>>> I have been playing in a new file without any headers at all (no lines
>>>>> starting with '*') and while I could execute the code in the buffer,
>>>>> exporting to HTML always failed with:
>>>>>
>>>>>      No such file: c:/org/babel-python-test.org::
>>>>>
>>>> Hmm, it looks like it's trying to find a file with "::" attached to the
>>>> end which is probably the source of the issue.  I wonder if this is a
>>>> windows specific problem?
>>>>
>>> a-ha,
>>>
>>> I just noticed that while my test file "python.org" was exporting w/o
>>> problem, it was opening a "python.org::" buffer in the process, so maybe
>>> the reason this throws errors for you and not for me is just Unix's more
>>> permissive file names.
>>>
>>> I've just pushed up a change to the Babel exporter that will only concat
>>> the "::" to the end of a file name, where there is actually a heading to
>>> following it.  Hopefully this will fix the error you described, please
>>> let me know if that is not the case.
>>>
>>> Best -- Eric
>>>
>>> _______________________________________________
>>> 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

Bug: subtree export fails with src block

[Christian Moe]

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

Hi,

Selecting a subtree only, export to html fails if the subtree contains 
a src block. Using 7.01trans, freshly pulled, on Emacs 23.

Example

file: test2.org
-----------------------

* Heading 1

Text

* Heading 2

Text

#+begin_src emacs-lisp
   (message "Something funny with export")
#+end_src

-----------------------

Exporting the whole works fine.

Exporting the first subtree (C-c C-e 1 b) works, but leaves an active 
region around the subtree.

Exporting the second subtree fails, producing no output, with these
messages:

: Exporting...
: org-babel-exp processing...
: org-open-file: No such file: /Users/CM/org/test2.org::

A backtrace is attached.

Yours,
Christian

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

Debugger entered--Lisp error: (error #("No such file: /Users/CM/org/test2.org::" 14 39 (org-attr nil)))
  signal(error (#("No such file: /Users/CM/org/test2.org::" 14 39 (org-attr nil))))
  error("No such file: %s" #("/Users/CM/org/test2.org::" 0 25 (org-attr nil)))
  (if (and (not ...) (not ...) (not org-open-non-existing-files)) (error "No such file: %s" file))
  (let* ((file ...) (file-apps ...) (apps ...) (apps-dlink ...) (remp ...) (dirp ...) (file ...) (a-m-a-p ...) (dfile ...) (link ...) (dlink ...) (old-buffer ...) (old-pos ...) (old-mode major-mode) ext cmd link-match-data) (if (string-match "^.*\\.\\([a-zA-Z0-9]+\\.gz\\)$" dfile) (setq ext ...) (if ... ...)) (cond (... ...) (in-emacs ...) (t ...)) (when (eq cmd ...) (setq cmd ...)) (when (eq cmd ...) (setq cmd ...)) (when (eq cmd ...) (require ...) (mailcap-parse-mailcaps) (let* ... ...)) (if (and ... ... ...) (error "No such file: %s" file)) (cond (... ... ... ... ...) (... ... ... ...) (... ...) (t ...)) (and (org-mode-p) (eq old-mode ...) (or ... ...) (org-mark-ring-push old-pos old-buffer)))
  org-open-file(#("/Users/CM/org/test2.org::" 0 25 (org-attr nil)) nil nil nil)
  (if (string-match "[*?{]" (file-name-nondirectory path)) (dired path) (org-open-file path in-emacs line search))
  (cond ((assoc type org-link-protocols) (funcall ... path)) ((equal type "mailto") (let ... ... ... ...)) ((member type ...) (browse-url ...)) ((string= type "doi") (browse-url ...)) ((member type ...) (browse-url ...)) ((string= type "tags") (org-tags-view in-emacs path)) ((string= type "tree-match") (org-occur ...)) ((string= type "file") (if ... ... ...) (if ... ... ...)) ((string= type "news") (require ...) (org-gnus-follow-link path)) ((string= type "shell") (let ... ...)) ((string= type "elisp") (let ... ...)) ((and ... ...)) ((string= type "thisfile") (if in-emacs ... ...) (let ... ...)) (t (browse-url-at-point)))
  (save-current-buffer (set-buffer (or reference-buffer ...)) (if (string-match " +\\'" path) (setq path ...)) (if (and org-link-translation-function ...) (let ... ...)) (cond (... ...) (... ...) (... ...) (... ...) (... ...) (... ...) (... ...) (... ... ...) (... ... ...) (... ...) (... ...) (...) (... ... ...) (t ...)))
  (with-current-buffer (or reference-buffer (current-buffer)) (if (string-match " +\\'" path) (setq path ...)) (if (and org-link-translation-function ...) (let ... ...)) (cond (... ...) (... ...) (... ...) (... ...) (... ...) (... ...) (... ...) (... ... ...) (... ... ...) (... ...) (... ...) (...) (... ... ...) (t ...)))
  (let (type path link line search (pos ...)) (catch (quote match) (save-excursion ... ...) (when ... ... ...) (save-excursion ...) (save-excursion ...) (when ... ... ...)) (unless path (error "No link found")) (with-current-buffer (or reference-buffer ...) (if ... ...) (if ... ...) (cond ... ... ... ... ... ... ... ... ... ... ... ... ... ...)))
  (cond ((and ... ... ...) (or ... ...)) ((run-hook-with-args-until-success ...)) ((org-at-timestamp-p t) (org-follow-timestamp-link)) ((or ... ...) (org-footnote-action)) (t (let ... ... ... ...)))
  (if (call-interactively (function org-babel-open-src-block-result)) nil (org-load-modules-maybe) (move-marker org-open-link-marker (point)) (setq org-window-config-before-follow-link (current-window-configuration)) (org-remove-occur-highlights nil nil t) (cond (... ...) (...) (... ...) (... ...) (t ...)) (move-marker org-open-link-marker nil) (run-hook-with-args (quote org-follow-link-hook)))
  (unless (call-interactively (function org-babel-open-src-block-result)) (org-load-modules-maybe) (move-marker org-open-link-marker (point)) (setq org-window-config-before-follow-link (current-window-configuration)) (org-remove-occur-highlights nil nil t) (cond (... ...) (...) (... ...) (... ...) (t ...)) (move-marker org-open-link-marker nil) (run-hook-with-args (quote org-follow-link-hook)))
  org-open-at-point(nil #<buffer test2.org>)
  (let ((org-inhibit-startup t)) (org-mode) (insert s) (goto-char (point-min)) (when reference-buffer (setq org-link-abbrev-alist-local ...)) (org-open-at-point arg reference-buffer))
  (progn (let (...) (org-mode) (insert s) (goto-char ...) (when reference-buffer ...) (org-open-at-point arg reference-buffer)))
  (unwind-protect (progn (let ... ... ... ... ... ...)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))
  (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn ...) (and ... ...)))
  (with-current-buffer temp-buffer (unwind-protect (progn ...) (and ... ...)))
  (let ((temp-buffer ...)) (with-current-buffer temp-buffer (unwind-protect ... ...)))
  (with-temp-buffer (let (...) (org-mode) (insert s) (goto-char ...) (when reference-buffer ...) (org-open-at-point arg reference-buffer)))
  (let ((reference-buffer ...)) (with-temp-buffer (let ... ... ... ... ... ...)))
  org-open-link-from-string("[[/Users/CM/org/test2.org::]]")
  (save-restriction (org-open-link-from-string link) (setf (nth 2 info) (org-babel-merge-params org-babel-default-header-args ... ... ... raw-params)))
  (progn (set-buffer (get-file-buffer org-current-export-file)) (save-restriction (org-open-link-from-string link) (setf ... ...)) (set-buffer export-buffer) (setf (nth 1 info) (if ... ... ...)))
  (if info (progn (set-buffer ...) (save-restriction ... ...) (set-buffer export-buffer) (setf ... ...)))
  (when info (set-buffer (get-file-buffer org-current-export-file)) (save-restriction (org-open-link-from-string link) (setf ... ...)) (set-buffer export-buffer) (setf (nth 1 info) (if ... ... ...)))
  (let* ((raw-header ...) (info ...) (lang ...) (lang-headers ...) (raw-params ...) (link ...) (export-buffer ...)) (when info (set-buffer ...) (save-restriction ... ...) (set-buffer export-buffer) (setf ... ...)) (org-babel-exp-do-export info (quote block)))
  (save-excursion (goto-char (match-beginning 0)) (let* (... ... ... ... ... ... ...) (when info ... ... ... ...) (org-babel-exp-do-export info ...)))
  org-babel-exp-src-blocks(#("(message \"Something funny with export\")" 0 39 (fontified t font-lock-fontified t)) #("emacs-lisp" 0 10 (font-lock-fontified t fontified t)))
  apply(org-babel-exp-src-blocks #("(message \"Something funny with export\")" 0 39 (fontified t font-lock-fontified t)) #("emacs-lisp" 0 10 (font-lock-fontified t fontified t)))
  (if (memq type org-export-blocks-witheld) "" (apply func body headers))
  (progn (if (memq type org-export-blocks-witheld) "" (apply func body headers)))
  (unwind-protect (progn (if ... "" ...)) (set-match-data save-match-data-internal (quote evaporate)))
  (let ((save-match-data-internal ...)) (unwind-protect (progn ...) (set-match-data save-match-data-internal ...)))
  (save-match-data (if (memq type org-export-blocks-witheld) "" (apply func body headers)))
  (let ((replacement ...)) (when replacement (replace-match replacement t t) (unless preserve-indent ...)))
  (progn (let (...) (when replacement ... ...)))
  (if (setq func (cadr ...)) (progn (let ... ...)))
  (when (setq func (cadr ...)) (let (...) (when replacement ... ...)))
  (while (re-search-forward "^\\([ 	]*\\)#\\+begin_\\(\\S-+\\)[ 	]*\\(.*\\)?[\r\n]\\([^\0]*?\\)[\r\n][ 	]*#\\+end_\\S-+.*[\r\n]?" nil t) (setq indentation (length ...)) (setq type (intern ...)) (setq headers (save-match-data ...)) (setq body (match-string 4)) (setq preserve-indent (or org-src-preserve-indentation ...)) (unless preserve-indent (setq body ...)) (unless (memq type types) (setq types ...)) (save-match-data (interblock start ...)) (when (setq func ...) (let ... ...)) (setq start (match-end 0)))
  (progn (fset (quote interblock) (function* ...)) (goto-char (point-min)) (setq start (point)) (while (re-search-forward "^\\([ 	]*\\)#\\+begin_\\(\\S-+\\)[ 	]*\\(.*\\)?[\r\n]\\([^\0]*?\\)[\r\n][ 	]*#\\+end_\\S-+.*[\r\n]?" nil t) (setq indentation ...) (setq type ...) (setq headers ...) (setq body ...) (setq preserve-indent ...) (unless preserve-indent ...) (unless ... ...) (save-match-data ...) (when ... ...) (setq start ...)) (interblock start (point-max)) (run-hooks (quote org-export-blocks-postblock-hook)))
  (unwind-protect (progn (fset ... ...) (goto-char ...) (setq start ...) (while ... ... ... ... ... ... ... ... ... ... ...) (interblock start ...) (run-hooks ...)) (if --cl-letf-bound-- (fset ... --cl-letf-save--) (fmakunbound ...)))
  (let* ((--cl-letf-bound-- ...) (--cl-letf-save-- ...)) (unwind-protect (progn ... ... ... ... ... ...) (if --cl-letf-bound-- ... ...)))
  (letf ((... ...)) (goto-char (point-min)) (setq start (point)) (while (re-search-forward "^\\([ 	]*\\)#\\+begin_\\(\\S-+\\)[ 	]*\\(.*\\)?[\r\n]\\([^\0]*?\\)[\r\n][ 	]*#\\+end_\\S-+.*[\r\n]?" nil t) (setq indentation ...) (setq type ...) (setq headers ...) (setq body ...) (setq preserve-indent ...) (unless preserve-indent ...) (unless ... ...) (save-match-data ...) (when ... ...) (setq start ...)) (interblock start (point-max)) (run-hooks (quote org-export-blocks-postblock-hook)))
  (letf* ((... ...)) (goto-char (point-min)) (setq start (point)) (while (re-search-forward "^\\([ 	]*\\)#\\+begin_\\(\\S-+\\)[ 	]*\\(.*\\)?[\r\n]\\([^\0]*?\\)[\r\n][ 	]*#\\+end_\\S-+.*[\r\n]?" nil t) (setq indentation ...) (setq type ...) (setq headers ...) (setq body ...) (setq preserve-indent ...) (unless preserve-indent ...) (unless ... ...) (save-match-data ...) (when ... ...) (setq start ...)) (interblock start (point-max)) (run-hooks (quote org-export-blocks-postblock-hook)))
  (flet ((interblock ... ...)) (goto-char (point-min)) (setq start (point)) (while (re-search-forward "^\\([ 	]*\\)#\\+begin_\\(\\S-+\\)[ 	]*\\(.*\\)?[\r\n]\\([^\0]*?\\)[\r\n][ 	]*#\\+end_\\S-+.*[\r\n]?" nil t) (setq indentation ...) (setq type ...) (setq headers ...) (setq body ...) (setq preserve-indent ...) (unless preserve-indent ...) (unless ... ...) (save-match-data ...) (when ... ...) (setq start ...)) (interblock start (point-max)) (run-hooks (quote org-export-blocks-postblock-hook)))
  (let ((case-fold-search t) (types ...) indentation type func start body headers preserve-indent progress-marker) (flet (...) (goto-char ...) (setq start ...) (while ... ... ... ... ... ... ... ... ... ... ...) (interblock start ...) (run-hooks ...)))
  (save-window-excursion (let (... ... indentation type func start body headers preserve-indent progress-marker) (flet ... ... ... ... ... ...)))
  org-export-blocks-preprocess()
  run-hooks(org-export-preprocess-after-include-files-hook)
  (save-current-buffer (set-buffer (get-buffer-create " org-mode-tmp")) (erase-buffer) (insert string) (setq case-fold-search t) (let (...) (remove-text-properties ... ... ...)) (org-export-kill-licensed-text) (let (...) (org-mode)) (setq case-fold-search t) (org-install-letbind) (run-hooks (quote org-export-preprocess-hook)) (org-export-preprocess-apply-macros) (run-hooks (quote org-export-preprocess-after-macros-hook)) (untabify (point-min) (point-max)) (org-export-handle-include-files-recurse) (run-hooks (quote org-export-preprocess-after-include-files-hook)) (org-export-remove-archived-trees archived-trees) (org-export-remove-comment-blocks-and-subtrees) (org-export-handle-export-tags (plist-get parameters :select-tags) (plist-get parameters :exclude-tags)) (run-hooks (quote org-export-preprocess-after-tree-selection-hook)) (org-export-mark-list-ending backend) (org-export-replace-src-segments-and-examples backend) (org-export-protect-colon-examples) (when (plist-get parameters :footnotes) (org-footnote-normalize nil t)) (setq target-alist (org-export-define-heading-targets target-alist)) (run-hooks (quote org-export-preprocess-after-headline-targets-hook)) (org-export-remember-html-container-classes) (org-export-remove-or-extract-drawers drawers (plist-get parameters :drawers) backend) (when (plist-get parameters :skip-before-1st-heading) (goto-char ...) (when ... ... ... ...)) (when (plist-get parameters :add-text) (goto-char ...) (insert ... "\n")) (org-export-remove-headline-metadata parameters) (setq target-alist (org-export-handle-invisible-targets target-alist)) (run-hooks (quote org-export-preprocess-before-selecting-backend-code-hook)) (org-export-select-backend-specific-text backend) (org-export-protect-quoted-subtrees) (org-export-remove-clock-lines) (org-export-protect-verbatim) (org-export-mark-blockquote-verse-center) (run-hooks (quote org-export-preprocess-after-blockquote-hook)) (unless (plist-get parameters :timestamps) (org-export-remove-timestamps)) (setq target-alist (org-export-attach-captions-and-attributes backend target-alist)) (org-export-mark-radio-links) (run-hooks (quote org-export-preprocess-after-radio-targets-hook)) (org-export-concatenate-multiline-links) (run-hooks (quote org-export-preprocess-before-normalizing-links-hook)) (org-export-normalize-links) (org-export-target-internal-links target-alist) (when (plist-get parameters :emph-multiline) (org-export-concatenate-multiline-emphasis)) (when org-export-table-remove-special-lines (org-export-remove-special-table-lines)) (run-hooks (quote org-export-preprocess-before-backend-specifics-hook)) ...)
  (with-current-buffer (get-buffer-create " org-mode-tmp") (erase-buffer) (insert string) (setq case-fold-search t) (let (...) (remove-text-properties ... ... ...)) (org-export-kill-licensed-text) (let (...) (org-mode)) (setq case-fold-search t) (org-install-letbind) (run-hooks (quote org-export-preprocess-hook)) (org-export-preprocess-apply-macros) (run-hooks (quote org-export-preprocess-after-macros-hook)) (untabify (point-min) (point-max)) (org-export-handle-include-files-recurse) (run-hooks (quote org-export-preprocess-after-include-files-hook)) (org-export-remove-archived-trees archived-trees) (org-export-remove-comment-blocks-and-subtrees) (org-export-handle-export-tags (plist-get parameters :select-tags) (plist-get parameters :exclude-tags)) (run-hooks (quote org-export-preprocess-after-tree-selection-hook)) (org-export-mark-list-ending backend) (org-export-replace-src-segments-and-examples backend) (org-export-protect-colon-examples) (when (plist-get parameters :footnotes) (org-footnote-normalize nil t)) (setq target-alist (org-export-define-heading-targets target-alist)) (run-hooks (quote org-export-preprocess-after-headline-targets-hook)) (org-export-remember-html-container-classes) (org-export-remove-or-extract-drawers drawers (plist-get parameters :drawers) backend) (when (plist-get parameters :skip-before-1st-heading) (goto-char ...) (when ... ... ... ...)) (when (plist-get parameters :add-text) (goto-char ...) (insert ... "\n")) (org-export-remove-headline-metadata parameters) (setq target-alist (org-export-handle-invisible-targets target-alist)) (run-hooks (quote org-export-preprocess-before-selecting-backend-code-hook)) (org-export-select-backend-specific-text backend) (org-export-protect-quoted-subtrees) (org-export-remove-clock-lines) (org-export-protect-verbatim) (org-export-mark-blockquote-verse-center) (run-hooks (quote org-export-preprocess-after-blockquote-hook)) (unless (plist-get parameters :timestamps) (org-export-remove-timestamps)) (setq target-alist (org-export-attach-captions-and-attributes backend target-alist)) (org-export-mark-radio-links) (run-hooks (quote org-export-preprocess-after-radio-targets-hook)) (org-export-concatenate-multiline-links) (run-hooks (quote org-export-preprocess-before-normalizing-links-hook)) (org-export-normalize-links) (org-export-target-internal-links target-alist) (when (plist-get parameters :emph-multiline) (org-export-concatenate-multiline-emphasis)) (when org-export-table-remove-special-lines (org-export-remove-special-table-lines)) (run-hooks (quote org-export-preprocess-before-backend-specifics-hook)) ...)
  (let* ((htmlp ...) (asciip ...) (latexp ...) (docbookp ...) (backend ...) (archived-trees ...) (inhibit-read-only t) (drawers org-drawers) (outline-regexp "\\*+ ") target-alist rtn) (setq org-export-target-aliases nil org-export-preferred-target-alist nil org-export-id-target-alist nil org-export-code-refs nil) (with-current-buffer (get-buffer-create " org-mode-tmp") (erase-buffer) (insert string) (setq case-fold-search t) (let ... ...) (org-export-kill-licensed-text) (let ... ...) (setq case-fold-search t) (org-install-letbind) (run-hooks ...) (org-export-preprocess-apply-macros) (run-hooks ...) (untabify ... ...) (org-export-handle-include-files-recurse) (run-hooks ...) (org-export-remove-archived-trees archived-trees) (org-export-remove-comment-blocks-and-subtrees) (org-export-handle-export-tags ... ...) (run-hooks ...) (org-export-mark-list-ending backend) (org-export-replace-src-segments-and-examples backend) (org-export-protect-colon-examples) (when ... ...) (setq target-alist ...) (run-hooks ...) (org-export-remember-html-container-classes) (org-export-remove-or-extract-drawers drawers ... backend) (when ... ... ...) (when ... ... ...) (org-export-remove-headline-metadata parameters) (setq target-alist ...) (run-hooks ...) (org-export-select-backend-specific-text backend) (org-export-protect-quoted-subtrees) (org-export-remove-clock-lines) (org-export-protect-verbatim) (org-export-mark-blockquote-verse-center) (run-hooks ...) (unless ... ...) (setq target-alist ...) (org-export-mark-radio-links) (run-hooks ...) (org-export-concatenate-multiline-links) (run-hooks ...) (org-export-normalize-links) (org-export-target-internal-links target-alist) (when ... ...) (when org-export-table-remove-special-lines ...) (run-hooks ...) ...) (kill-buffer " org-mode-tmp") rtn)
  org-export-preprocess-string(#("* Heading 2\n\nText\n\n#+begin_src emacs-lisp\n  (message \"Something funny with export\")\n#+end_src\n\n" 0 2 (fontified t face org-level-1 :org-license-to-kill t) 2 11 (fontified t face org-level-1 :org-license-to-kill t) 11 12 (fontified t :org-license-to-kill t) 12 19 (fontified t) 19 41 (fontified t face org-meta-line font-lock-fontified t font-lock-multiline t) 41 42 (fontified t font-lock-fontified t font-lock-multiline t face org-meta-line) 42 83 (fontified t font-lock-fontified t font-lock-multiline t face org-block) 83 84 (fontified t font-lock-fontified t font-lock-multiline t face org-block) 84 93 (fontified t face org-meta-line font-lock-fontified t font-lock-multiline t) 93 94 (fontified t face org-meta-line) 94 95 (fontified t)) :emph-multiline t :for-html t :skip-before-1st-heading nil :drawers nil :todo-keywords t :tags not-in-toc :priority nil :footnotes t :timestamps t :archived-trees headline :select-tags ("export") :exclude-tags ("noexport") :add-text nil :LaTeX-fragments t)
  (org-split-string (org-export-preprocess-string region :emph-multiline t :for-html t :skip-before-1st-heading (plist-get opt-plist :skip-before-1st-heading) :drawers (plist-get opt-plist :drawers) :todo-keywords (plist-get opt-plist :todo-keywords) :tags (plist-get opt-plist :tags) :priority (plist-get opt-plist :priority) :footnotes (plist-get opt-plist :footnotes) :timestamps (plist-get opt-plist :timestamps) :archived-trees (plist-get opt-plist :archived-trees) :select-tags (plist-get opt-plist :select-tags) :exclude-tags (plist-get opt-plist :exclude-tags) :add-text (plist-get opt-plist :text) :LaTeX-fragments (plist-get opt-plist :LaTeX-fragments)) "[\r\n]")
  (let* ((opt-plist ...) (body-only ...) (style ...) (html-extension ...) (link-validate ...) valid thetoc have-headings first-heading-pos (odd org-odd-levels-only) (region-p ...) (rbeg ...) (rend ...) (subtree-p ...) (level-offset ...) (opt-plist ...) (org-current-export-dir ...) (org-current-export-file buffer-file-name) (level 0) (line "") (origline "") txt todo (umax nil) (umax-toc nil) (filename ...) (current-dir ...) (buffer ...) (org-levels-open ...) (date ...) (author ...) (title ...) (link-up ...) (link-home ...) (dummy ...) (html-table-tag ...) (quote-re0 ...) (quote-re ...) (inquote nil) (infixed nil) (inverse nil) (in-local-list nil) (local-list-type nil) (local-list-indent nil) (llt org-plain-list-ordered-item-terminator) (email ...) (language ...) (keywords ...) (description ...) (lang-words nil) ...) (let (...) (org-unmodified ...)) (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 (... ...) (date) (t ...)) (setq lang-words (or ... ...)) (set-buffer buffer) (let (...) (erase-buffer)) (fundamental-mode) (org-install-letbind) (and (fboundp ...) (set-buffer-file-coding-system coding-system-for-write)) (let (... ...) (mapc ... org-export-plist-vars) (setq umax ...) (setq umax-toc ...) (unless body-only ... ... ...) (if ... ...) (setq head-count 0) (org-init-section-numbers) (org-open-par) (while ... ...) (when inquote ... ...) (org-html-level-start 1 nil umax ... head-count) (when ... ...) (save-excursion ... ...) (when footnotes ...) (let ... ...) (unless body-only ... ... ... ...) (unless ... ... ...) (goto-char ...) (when thetoc ... ... ... ...) (goto-char ...) (while ... ...) (goto-char ...) (while ... ...) (goto-char ...) (goto-char ...) (let ... ...) (goto-char ...) (when ... ...) (remove-text-properties ... ... ...) (run-hooks ...) (or to-buffer ...) (goto-char ...) (or ... ...) (if ... ... ...)))
  org-export-as-html(nil hidden)
  org-export-as-html-and-open(nil)
  call-interactively(org-export-as-html-and-open)
  (if (and bg (nth 2 ass) (not ...) (not ...)) (let (...) (set-process-sentinel p ...) (message "Background process \"%s\": started" p)) (if subtree-p (progn ... ...)) (call-interactively (nth 1 ass)) (when (and bpos ...) (let ... ... ... ... ...)))
  (let* ((bg ...) subtree-p (help "[t]   insert the export option template\n[v]   limit export to visible part of outline tree\n[1]   only export the current subtree\n[SPC] publish enclosing subtree (with LaTeX_CLASS or EXPORT_FILE_NAME prop)\n\n[a/n/u] export as ASCII/Latin-1/UTF-8         [A/N/U] to temporary buffer\n\n[h] export as HTML      [H] to temporary buffer   [R] export region\n[b] export as HTML and open in browser\n\n[l] export as LaTeX     [L] to temporary buffer\n[p] export as LaTeX and process to PDF            [d] ... and open PDF file\n\n[D] export as DocBook   [V] export as DocBook, process to PDF, and open\n\n[j] export as TaskJuggler                         [J] ... and open\n\n[m] export as Freemind mind map\n[x] export as XOXO\n[g] export using Wes Hardaker's generic exporter\n\n[i] export current file as iCalendar file\n[I] export all agenda files as iCalendar files   [c] ...as one combined file\n\n[F] publish current file          [P] publish current project\n[X] publish a project...          [E] publish every projects") (cmds ...) r1 r2 ass (cpos ...) (cbuf ...) bpos) (save-excursion (save-window-excursion ... ... ... ... ... ... ...)) (and bpos (goto-char bpos)) (setq r2 (if ... ... r1)) (unless (setq ass ...) (error "No command associated with key %c" r1)) (if (and bg ... ... ...) (let ... ... ...) (if subtree-p ...) (call-interactively ...) (when ... ...)))
  org-export(nil)
  call-interactively(org-export nil nil)

[-- 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

Re: Bug: subtree export fails with src block

[Noorul Islam K M]

Christian Moe <mail@christianmoe.com> writes:

> Hi,
>
> Selecting a subtree only, export to html fails if the subtree contains
> a src block. Using 7.01trans, freshly pulled, on Emacs 23.
>
> Example
>
> file: test2.org
> -----------------------
>
> * Heading 1
>
> Text
>
> * Heading 2
>
> Text
>
> #+begin_src emacs-lisp
>   (message "Something funny with export")
> #+end_src
>
> -----------------------
>
> Exporting the whole works fine.
>
> Exporting the first subtree (C-c C-e 1 b) works, but leaves an active
> region around the subtree.

Yes you are right. I am able to reproduce this.

>
> Exporting the second subtree fails, producing no output, with these
> messages:
>
> : Exporting...
> : org-babel-exp processing...
> : org-open-file: No such file: /Users/CM/org/test2.org::
>

I am not able to reproduce this. I did not get any errors.

I have

Org-mode version 7.01trans (release_7.01h.555.g90cc.dirty)
GNU Emacs 23.1.1 (i686-pc-linux-gnu, GTK+ Version 2.12.12) of 2010-01-30 on noorul

Thanks and Regards
Noorul

Re: Re: Bug: subtree export fails with src block

[Eric Schulte]

Hi Christian,

Thanks for the complete bug report and reproduction information.
Unfortunately I was unable to reproduce the error you described.  Does
the file /Users/CM/org/test2.org exist on your system?  Presumably that
is the file from which you are exporting.  Is it saved before you
export?

Thanks -- Eric

I doubt the following is relevant, but...

I'm using the latest Org-mode from git.
Org-mode version 7.01trans (release_7.01h.566.gc33c)

and the latest Emacs from git
GNU Emacs 23.1.90.1

Noorul Islam K M <noorul@noorul.com> writes:

> Christian Moe <mail@christianmoe.com> writes:
>
>> Hi,
>>
>> Selecting a subtree only, export to html fails if the subtree contains
>> a src block. Using 7.01trans, freshly pulled, on Emacs 23.
>>
>> Example
>>
>> file: test2.org
>> -----------------------
>>
>> * Heading 1
>>
>> Text
>>
>> * Heading 2
>>
>> Text
>>
>> #+begin_src emacs-lisp
>>   (message "Something funny with export")
>> #+end_src
>>
>> -----------------------
>>
>> Exporting the whole works fine.
>>
>> Exporting the first subtree (C-c C-e 1 b) works, but leaves an active
>> region around the subtree.
>
> Yes you are right. I am able to reproduce this.
>
>>
>> Exporting the second subtree fails, producing no output, with these
>> messages:
>>
>> : Exporting...
>> : org-babel-exp processing...
>> : org-open-file: No such file: /Users/CM/org/test2.org::
>>
>
> I am not able to reproduce this. I did not get any errors.
>
> I have
>
> Org-mode version 7.01trans (release_7.01h.555.g90cc.dirty)
> GNU Emacs 23.1.1 (i686-pc-linux-gnu, GTK+ Version 2.12.12) of 2010-01-30 on noorul
>
> Thanks and Regards
> Noorul
>
>
> _______________________________________________
> 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

Re: Re: Bug: subtree export fails with src block

[Christian Moe]

Hi, Eric,

Yes, the file is saved, and is the one I'm trying to export from.

If neither you nor Noorul can reproduce it, I may have messed up 
something. But I can't think what.

It looks like the problem arises in this part of org-babel-exp-src-blocks

	   (link (org-make-link-string
		  (concat
		   org-current-export-file
		   "::"
		   (nth 4 (ignore-errors (org-heading-components))))))

and that org-heading-components fails to return the heading text. 
Can't see why, though.

Yours,
Christian


On 9/23/10 5:17 PM, Eric Schulte wrote:
> Hi Christian,
>
> Thanks for the complete bug report and reproduction information.
> Unfortunately I was unable to reproduce the error you described.  Does
> the file /Users/CM/org/test2.org exist on your system?  Presumably that
> is the file from which you are exporting.  Is it saved before you
> export?
>
> Thanks -- Eric
>
> I doubt the following is relevant, but...
>
> I'm using the latest Org-mode from git.
> Org-mode version 7.01trans (release_7.01h.566.gc33c)
>
> and the latest Emacs from git
> GNU Emacs 23.1.90.1
>
> Noorul Islam K M<noorul@noorul.com>  writes:
>
>> Christian Moe<mail@christianmoe.com>  writes:
>>
>>> Hi,
>>>
>>> Selecting a subtree only, export to html fails if the subtree contains
>>> a src block. Using 7.01trans, freshly pulled, on Emacs 23.
>>>
>>> Example
>>>
>>> file: test2.org
>>> -----------------------
>>>
>>> * Heading 1
>>>
>>> Text
>>>
>>> * Heading 2
>>>
>>> Text
>>>
>>> #+begin_src emacs-lisp
>>>    (message "Something funny with export")
>>> #+end_src
>>>
>>> -----------------------
>>>
>>> Exporting the whole works fine.
>>>
>>> Exporting the first subtree (C-c C-e 1 b) works, but leaves an active
>>> region around the subtree.
>>
>> Yes you are right. I am able to reproduce this.
>>
>>>
>>> Exporting the second subtree fails, producing no output, with these
>>> messages:
>>>
>>> : Exporting...
>>> : org-babel-exp processing...
>>> : org-open-file: No such file: /Users/CM/org/test2.org::
>>>
>>
>> I am not able to reproduce this. I did not get any errors.
>>
>> I have
>>
>> Org-mode version 7.01trans (release_7.01h.555.g90cc.dirty)
>> GNU Emacs 23.1.1 (i686-pc-linux-gnu, GTK+ Version 2.12.12) of 2010-01-30 on noorul
>>
>> Thanks and Regards
>> Noorul
>>
>>
>> _______________________________________________
>> 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
>
> _______________________________________________
> 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
>


-- 

Christian Moe
E-mail:  mail@christianmoe.com
Website: http://christianmoe.com