[Orgmode] "No link found" error during export of source block when headline has link

Wed, 22 Sep 2010 18:49:32 -0700 

Hi all,

When I export this file to HTML

============================================================
* [[http://www.example.com][example]]

  #+BEGIN_SRC R
    1
  #+END_SRC
============================================================


I get a "No link found" error.  The responsible function seems to be

org-open-link-from-string(#("[[/tmp/a.org::%5B%5Bhttp://www.example.com%5D%5Bexample%5D%5D][/tmp/a.org::[[http://www.example.com][example]]]
...)

Please see the attached backtrace.

I am using the latest version from git.  I used git bisect and found
that the first bad commit is efdf78172d9f7c0070c781d136a9b49a2a56fcc4.

--
Best,
Hsiu-Khuern.

Debugger entered--Lisp error: (error "No link found")
  signal(error ("No link found"))
  error("No link found")
  org-open-at-point(nil #<buffer a.org>)
  
org-open-link-from-string(#("[[/tmp/a.org::%5B%5Bhttp://www.example.com%5D%5Bexample%5D%5D][/tmp/a.org::[[http://www.example.com][example]]]]";
 2 14 (org-attr nil) 20 42 (org-attr nil) 48 55 (org-attr nil) 63 110 (org-attr 
nil)))
  org-babel-exp-src-blocks(#("1" 0 1 (font-lock-fontified t fontified t)) #("R" 
0 1 (fontified t font-lock-fontified t)))
  apply(org-babel-exp-src-blocks #("1" 0 1 (font-lock-fontified t fontified t)) 
#("R" 0 1 (fontified t font-lock-fontified t)))
  
byte-code("\306\307\211\211\211\211\211\211\211\211%&'(\310\311!\211)\205#\311K*\312\216\311\313M\210eb\210`\314\315\307\306#\203\326\316\317!G&\320\316\321!\227!%\322
 +\323\216\324\316\325!\326\"*\316\327!,\206`\330\n\235\211\204p\322 
+\331\216\332!*%'>\204%'B'\322 
+\333\216\311\f\334\224\"\210*\335%-\"\211.A@)\211\203\320\322 
+\336\216%/>\203\257\337\202\264\340
\n#*\2110\203\317\3410\306\211#\210 
\204\317\342\334\224\334\225&#\210)\334\225\2020\311\fd\"\210\343\344!.
\207" [progress-marker preserve-indent headers body start func t nil fboundp 
interblock ((byte-code "\203\302        M\210\202\303\302!\210\302\207" 
[--cl-letf-bound-- --cl-letf-save-- interblock fmakunbound] 2)) #[(start end) 
"\301\302\"\207" [org-export-interblocks mapcar #[... "\211A@)\n\"\207" 
[pair x start end] 4]] 3] re-search-forward "^\\([  ]*\\)#\\+begin_\\(\\S-+\\)[ 
    ]*\\(.*\\)?[
\n]\\([^]*?\\)[
\n][    ]*#\\+end_\\S-+.*[
\n]?" match-string 1 intern 2 match-data ((byte-code "\301\302\"\207" 
[save-match-data-internal set-match-data evaporate] 3)) org-split-string 3 "[   
 ]+" 4 "-i" ((byte-code "\301\302\"\207" [save-match-data-internal 
set-match-data evaporate] 3)) org-remove-indentation ((byte-code 
"\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) 0 
assoc ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data 
evaporate] 3)) "" apply replace-match indent-code-rigidly run-hooks 
org-export-blocks-postblock-hook type indentation types case-fold-search 
--cl-letf-bound-- --cl-letf-save-- save-match-data-internal 
org-src-preserve-indentation org-export-blocks x org-export-blocks-witheld 
replacement] 11)
  org-export-blocks-preprocess()
  run-hooks(org-export-preprocess-after-include-files-hook)
  org-export-preprocess-string(#("* [[http://www.example.com][example]]\n\n  
#+BEGIN_SRC R\n    1\n  #+END_SRC\n" 0 2 (fontified t face org-level-1) 2 4 
(fontified t face org-link org-no-flyspell t invisible org-link keymap (keymap 
... ... ...) mouse-face highlight font-lock-multiline t help-echo "LINK: 
http://www.example.com";) 4 27 (fontified t face org-link org-no-flyspell t 
mouse-face highlight keymap (keymap ... ... ...) invisible org-link 
font-lock-multiline t help-echo "LINK: http://www.example.com";) 27 28 
(fontified t face org-link org-no-flyspell t mouse-face highlight keymap 
(keymap ... ... ...) invisible org-link font-lock-multiline t help-echo "LINK: 
http://www.example.com"; rear-nonsticky (mouse-face highlight keymap invisible 
intangible help-echo org-linked-text)) 28 34 (fontified t face org-link 
org-no-flyspell t mouse-face highlight keymap (keymap ... ... ...) 
font-lock-multiline t help-echo "LINK: http://www.example.com";) 34 35 
(fontified t face org-link org-no-flyspell t mouse-face highlight keymap 
(keymap ... ... ...) rear-nonsticky (mouse-face highlight keymap invisible 
intangible help-echo org-linked-text) font-lock-multiline t help-echo "LINK: 
http://www.example.com";) 35 36 (fontified t face org-link org-no-flyspell t 
invisible org-link keymap (keymap ... ... ...) mouse-face highlight 
font-lock-multiline t help-echo "LINK: http://www.example.com";) 36 37 
(fontified t face org-link org-no-flyspell t invisible org-link keymap (keymap 
... ... ...) mouse-face highlight font-lock-multiline t help-echo "LINK: 
http://www.example.com"; rear-nonsticky (mouse-face highlight keymap invisible 
intangible help-echo org-linked-text)) 37 38 (fontified t) 38 39 (fontified t) 
39 41 (fontified t font-lock-fontified t font-lock-multiline t face 
org-meta-line) 41 43 (font-lock-fontified t fontified t font-lock-multiline t 
face org-meta-line) 43 49 (font-lock-fontified t fontified t 
font-lock-multiline t face org-meta-line) 49 54 (font-lock-fontified t 
fontified t font-lock-multiline t face org-meta-line) 54 55 
(font-lock-fontified t fontified t font-lock-multiline t) 55 60 
(font-lock-fontified t fontified t font-lock-multiline t) 60 61 
(font-lock-fontified t fontified t font-lock-multiline t) 61 63 
(font-lock-fontified t fontified t font-lock-multiline t face org-meta-line) 63 
65 (font-lock-fontified t fontified t font-lock-multiline t face org-meta-line) 
65 69 (font-lock-fontified t fontified t font-lock-multiline t face 
org-meta-line) 69 72 (font-lock-fontified t fontified t font-lock-multiline t 
face org-meta-line) 72 73 (fontified t rear-nonsticky t face org-meta-line)) 
: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-export-as-html(nil)
  call-interactively(org-export-as-html)
  org-export(nil)
  call-interactively(org-export nil nil)
  recursive-edit()
  byte-code("\306      
@\307=\203!\310\311\312\"\210\313\311!\211A@)\242\314=\203!\310\315\312\"\210\316!\210\317
 \210\320 !\210\f\203d\321ed\"
V\203Web\210\322
\245y\210`db\210\322
\245
Zy\210`|\210)\323c\210eb\210\324\325\326 
\"\210\327\306!\210\324\330!\210\331\312\324\330!\210\212\332 
\210+\331\207" [unread-command-char debugger-args x debugger-buffer 
noninteractive debugger-batch-max-lines -1 debug backtrace-debug 4 t 
backtrace-frame lambda 5 pop-to-buffer debugger-mode debugger-setup-buffer 
count-lines 2 "...\n" message "%s" buffer-string kill-emacs "" nil 
recursive-edit middlestart buffer-read-only standard-output] 4)
  debug(error (error "No link found"))

_______________________________________________
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

Reply via email to