Re: [O] Bug: Failure in `org-store-link'

[Eric Schulte]

This is not a tangling bug, this is actually a bug in org-store-link,
which throws an error when called in an Org-mode file outside of any
heading.

Thanks for pointing this out.

Best,

Sean Allred <address@hidden> writes:

> Remember to cover the basics, that is, what you expected to happen and
> what in fact did happen.  You don't know how to make a good report?  See
>
>      http://orgmode.org/manual/Feedback.html#Feedback
>
> Your bug report will be posted to the Org-mode mailing list.
> ------------------------------------------------------------------------
>
> With the following file:
>
> #+BEGIN_SRC org
>   ,#+BEGIN_SRC sh :tangle "test.sh"
>   ./test
>   ,#+END_SRC
>   ,* header
> #+END_SRC
>
> calling `org-babel-tangle` fails with stack trace:
>
>   string-match("..." nil)
>   org-store-link(nil)
>   org-babel-tangle-single-block(1)
>   org-babel-tangle-collect-blocks(nil nil)
>   org-babel-tangle(nil)
>   call-interactively(org-babel-tangle nil nil)
>
> The problem is fixable by adding a dummy heading that `org-babel-tangle`
> can give an ID to.  (Note my `org-id-link-to-org-use-id` is set to `t`.)
>
> I'm unsure on what correct behavior here would be; it seems the variable
> must be honored in any case, so perhaps it would be best to give a
> better error message along the lines of 'cannot give identification to a
> null heading' or somesuch.
>
> All the best,
> Sean
>
> Emacs  : GNU Emacs 24.3.1 (x86_64-apple-darwin, NS apple-appkit-1038.36)
>  of 2013-03-13 on bob.porkrind.org
> Package: Org-mode version 8.2.5h (8.2.5h-30-gdd810b-elpa @ 
> /Users/sean/Dropbox/.emacs.d/elpa/org-20140303/)
>
> current state:
> ==============
> (setq
>  org-export-preprocess-final-hook '((lambda nil (replace-string " --\n" " -- 
> \n")))
>  org-tab-first-hook '(org-hide-block-toggle-maybe 
> org-src-native-tab-command-maybe
>                     org-babel-hide-result-toggle-maybe 
> org-babel-header-arg-expand)
>  org-speed-command-hook '(org-speed-command-default-hook 
> org-babel-speed-command-hook)
>  org-occur-hook '(org-first-headline-recenter)
>  org-metaup-hook '(org-babel-load-in-session-maybe)
>  org-html-format-drawer-function '(lambda (name contents) contents)
>  org-latex-format-inlinetask-function 'ignore
>  org-confirm-shell-link-function 'yes-or-no-p
>  org-id-link-to-org-use-id t
>  org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
>  org-latex-format-headline-function 
> 'org-latex-format-headline-default-function
>  org-default-notes-file "~/Dropbox/org/notes.org"
>  org-after-todo-state-change-hook '(org-clock-out-if-current)
>  org-latex-format-drawer-function '(lambda (name contents) contents)
>  org-from-is-user-regexp "\\<Sean Allred\\>"
>  org-src-mode-hook '(org-src-babel-configure-edit-buffer 
> org-src-mode-configure-edit-buffer)
>  org-agenda-before-write-hook '(org-agenda-add-entry-text)
>  org-babel-pre-tangle-hook '(save-buffer)
>  org-mode-hook '(#[nil "\300\301\302\303\304$\207"
>                  [org-add-hook change-major-mode-hook org-show-block-all 
> append local] 5]
>                #[nil "\300\301\302\303\304$\207"
>                  [org-add-hook change-major-mode-hook 
> org-babel-show-result-all append local] 5]
>                org-babel-result-hide-spec org-babel-hide-all-hashes)
>  org-ascii-format-drawer-function '(lambda (name contents width) contents)
>  org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point 
> org-babel-execute-safely-maybe)
>  org-directory "~/Dropbox/org"
>  org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
>                 org-cycle-hide-inline-tasks org-cycle-show-empty-lines
>                 org-optimize-window-after-visibility-change)
>  org-babel-tangle-lang-exts '(("perl" . "pl") ("ruby" . "rb") ("python" . 
> "py")
>                             ("emacs-lisp" . "el"))
>  org-confirm-elisp-link-function 'yes-or-no-p
>  org-metadown-hook '(org-babel-pop-to-session-maybe)
>  org-html-format-headline-function 'ignore
>  org-structure-template-alist '(("nt"
>                                "#+name: ?\n#+begin_src emacs-lisp :tangle 
> \"\"\n\n#+end_src")
>                               ("n" "#+name: ?\n#+begin_src \n\n#+end_src")
>                               ("es" "#+begin_src emacs-lisp\n?\n#+end_src")
>                               ("esf" "#+begin_src emacs-lisp :tangle 
> %file\n?\n#+end_src")
>                               ("s" "#+BEGIN_SRC ?\n\n#+END_SRC" "<src 
> lang=\"?\">\n\n</src>")
>                               ("e" "#+BEGIN_EXAMPLE\n?\n#+END_EXAMPLE"
>                                "<example>\n?\n</example>")
>                               ("q" "#+BEGIN_QUOTE\n?\n#+END_QUOTE" 
> "<quote>\n?\n</quote>")
>                               ("v" "#+BEGIN_VERSE\n?\n#+END_VERSE" 
> "<verse>\n?\n</verse>")
>                               ("V" "#+BEGIN_VERBATIM\n?\n#+END_VERBATIM"
>                                "<verbatim>\n?\n</verbatim>")
>                               ("c" "#+BEGIN_CENTER\n?\n#+END_CENTER" 
> "<center>\n?\n</center>")
>                               ("l" "#+BEGIN_LaTeX\n?\n#+END_LaTeX"
>                                "<literal style=\"latex\">\n?\n</literal>")
>                               ("L" "#+LaTeX: " "<literal 
> style=\"latex\">?</literal>")
>                               ("h" "#+BEGIN_HTML\n?\n#+END_HTML"
>                                "<literal style=\"html\">\n?\n</literal>")
>                               ("H" "#+HTML: " "<literal 
> style=\"html\">?</literal>")
>                               ("a" "#+BEGIN_ASCII\n?\n#+END_ASCII" "") ("A" 
> "#+ASCII: " "")
>                               ("i" "#+INDEX: ?" "#+INDEX: ?")
>                               ("I" "#+INCLUDE: %file ?" "<include file=%file 
> markup=\"?\">"))
>  org-babel-load-languages '((sh . t) (python . t) (R . t) (ruby . t) (perl . 
> t))
>  org-html-format-inlinetask-function 'ignore
>  org-agenda-files "/Users/sean/Dropbox/.emacs.d/org-agenda-files.list"
>  org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
>  org-publish-project-alist '(("blog" :base-directory 
> "~/github/octopress/source/org_posts/"
>                             :base-extension "org" :publishing-directory
>                             "~/github/octopress/source/_posts/" 
> :sub-superscript "" :recursive
>                             t :publishing-function org-html-publish-to-html 
> :headline-levels 4
>                             :html-extension "markdown" :body-only t)
>                            )
>  )
>

-- 
Eric Schulte
https://cs.unm.edu/~eschulte
PGP: 0x614CA05D