Bug: org-babel-parse-src-block-match reporting "Wrong type argument:
stringp, nil" when exporting a org-mode file with a lots of code blocks
[8.3beta (release_8.3beta-895-g375c83 @ /usr/share/emacs/site-lisp/org/)]



the following is *Messages* buffer
   https://www.refheap.com/98243
the following is the org-mode file with a lot of code blocks
   
https://github.com/the-little-language-designer/cicada-nymph/blob/master/cicada-nymph.org
the following is an the fasm-mode I am using
   
https://github.com/the-little-language-designer/fasm-mode/blob/master/fasm-mode.el


Emacs  : GNU Emacs 24.4.1 (x86_64-unknown-linux-gnu, GTK+ Version 3.14.7)
 of 2015-01-18 on bisson
Package: Org-mode version 8.3beta (release_8.3beta-895-g375c83 @ 
/usr/share/emacs/site-lisp/org/)



current state:
==============
(setq
 org-tab-first-hook '(org-hide-block-toggle-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-src-window-setup 'current-window
 org-latex-format-inlinetask-function 
'org-latex-format-inlinetask-default-function
 org-confirm-shell-link-function 'yes-or-no-p
 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
 org-babel-no-eval-on-ctrl-c-ctrl-c t
 org-latex-format-headline-function 'org-latex-format-headline-default-function
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-latex-format-drawer-function '(lambda (name contents) contents)
 org-src-mode-hook '(org-src-babel-configure-edit-buffer 
org-src-mode-configure-edit-buffer
                     (lambda nil (local-set-key (kbd "C-s C-s") (quote 
org-edit-src-exit))))
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-babel-pre-tangle-hook '(save-buffer)
 org-mode-hook '((lambda nil (local-set-key (kbd "C-,") (quote 
ska-jump-to-register))) t current-window 0 nil
                 #[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-archive-hook '(org-attach-archive-delete-maybe)
 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-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-todo-keywords '((sequence "><" "|" "><><" "|" "><><><") (sequence "todo") 
(sequence "待") (sequence "note" "|" "test")
                     (sequence "記" "|" "測") (sequence "记" "|" "测"))
 org-reveal-hlevel 2
 org-babel-tangle-lang-exts '(("lisp" . "lisp") ("emacs-lisp" . "el") ("elisp" 
. "el"))
 org-confirm-elisp-link-function 'yes-or-no-p
 org-src-ask-before-returning-to-edit-buffer nil
 org-edit-src-content-indentation 0
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-html-format-headline-function 'org-html-format-headline-default-function
 org-structure-template-alist '(("sf" "#+end_src\n?\n#+begin_src" "<src 
lang=\"?\">\n\n</src>")
                                ("s" "#+begin_src\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("picturef" "#+end_src\n?\n#+begin_src picture" 
"<src lang=\"?\">\n\n</src>")
                                ("picture" "#+begin_src picture\n?\n#+end_src" 
"<src lang=\"?\">\n\n</src>")
                                ("yamlf" "#+end_src\n?\n#+begin_src yaml" "<src 
lang=\"?\">\n\n</src>")
                                ("yaml" "#+begin_src yaml\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("bnff" "#+end_src\n?\n#+begin_src bnf" "<src 
lang=\"?\">\n\n</src>")
                                ("bnf" "#+begin_src bnf\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("coqf" "#+end_src\n?\n#+begin_src coq" "<src 
lang=\"?\">\n\n</src>")
                                ("coq" "#+begin_src coq\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("ljf" "#+end_src\n?\n#+begin_src lojban" "<src 
lang=\"?\">\n\n</src>")
                                ("lj" "#+begin_src lojban\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("ssf" "#+end_src\n?\n#+begin_src scheme" "<src 
lang=\"?\">\n\n</src>")
                                ("ss" "#+begin_src scheme\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("lispf" "#+end_src\n?\n#+begin_src lisp" "<src 
lang=\"?\">\n\n</src>")
                                ("lisp" "#+begin_src lisp\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("shenf" "#+end_src\n?\n#+begin_src shen" "<src 
lang=\"?\">\n\n</src>")
                                ("shen" "#+begin_src shen\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("clojuref" "#+end_src\n?\n#+begin_src clojure" 
"<src lang=\"?\">\n\n</src>")
                                ("clojure" "#+begin_src clojure\n?\n#+end_src" 
"<src lang=\"?\">\n\n</src>")
                                ("seef" "#+end_src\n?\n#+begin_src emacs-lisp 
:tangle \"~/.emacs\"" "<src lang=\"?\">\n\n</src>")
                                ("see" "#+begin_src emacs-lisp :tangle 
\"~/.emacs\"\n?\n#+end_src" "<src lang=\"?\">\n\n</src>")
                                ("sef" "#+end_src\n?\n#+begin_src emacs-lisp" 
"<src lang=\"?\">\n\n</src>")
                                ("se" "#+begin_src emacs-lisp\n?\n#+end_src" 
"<src lang=\"?\">\n\n</src>")
                                ("cf" "#+end_src\n?\n#+begin_src cicada" "<src 
lang=\"?\">\n\n</src>")
                                ("c" "#+begin_src cicada\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("cnf" "#+end_src\n?\n#+begin_src cicada-nymph" 
"<src lang=\"?\">\n\n</src>")
                                ("cn" "#+begin_src cicada-nymph\n?\n#+end_src" 
"<src lang=\"?\">\n\n</src>")
                                ("forthf" "#+end_src\n?\n#+begin_src forth" 
"<src lang=\"?\">\n\n</src>")
                                ("forth" "#+begin_src forth\n?\n#+end_src" 
"<src lang=\"?\">\n\n</src>")
                                ("smlf" "#+end_src\n?\n#+begin_src sml" "<src 
lang=\"?\">\n\n</src>")
                                ("sml" "#+begin_src sml\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("camlf" "#+end_src\n?\n#+begin_src caml" "<src 
lang=\"?\">\n\n</src>")
                                ("caml" "#+begin_src caml\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("erlangf" "#+end_src\n?\n#+begin_src erlang" 
"<src lang=\"?\">\n\n</src>")
                                ("erlang" "#+begin_src erlang\n?\n#+end_src" 
"<src lang=\"?\">\n\n</src>")
                                ("lfef" "#+end_src\n?\n#+begin_src lfe" "<src 
lang=\"?\">\n\n</src>")
                                ("lfe" "#+begin_src lfe\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("fasmf" "#+end_src\n?\n#+begin_src fasm" "<src 
lang=\"?\">\n\n</src>")
                                ("fasm" "#+begin_src fasm\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("nasmf" "#+end_src\n?\n#+begin_src nasm" "<src 
lang=\"?\">\n\n</src>")
                                ("nasm" "#+begin_src nasm\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("Cf" "#+end_src\n?\n#+begin_src C" "<src 
lang=\"?\">\n\n</src>")
                                ("C" "#+begin_src C\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("javaf" "#+end_src\n?\n#+begin_src java" "<src 
lang=\"?\">\n\n</src>")
                                ("java" "#+begin_src java\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("jsf" "#+end_src\n?\n#+begin_src javascript" 
"<src lang=\"?\">\n\n</src>")
                                ("js" "#+begin_src javascript\n?\n#+end_src" 
"<src lang=\"?\">\n\n</src>")
                                ("luaf" "#+end_src\n?\n#+begin_src lua" "<src 
lang=\"?\">\n\n</src>")
                                ("lua" "#+begin_src lua\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("perlf" "#+end_src\n?\n#+begin_src perl" "<src 
lang=\"?\">\n\n</src>")
                                ("perl" "#+begin_src perl\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("shf" "#+end_src\n?\n#+begin_src sh" "<src 
lang=\"?\">\n\n</src>")
                                ("sh" "#+begin_src sh\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("sqlf" "#+end_src\n?\n#+begin_src sql :result 
value" "<src lang=\"?\">\n\n</src>")
                                ("sql" "#+begin_src sql :result 
value\n?\n#+end_src" "<src lang=\"?\">\n\n</src>")
                                ("rubyf" "#+end_src\n?\n#+begin_src ruby" "<src 
lang=\"?\">\n\n</src>")
                                ("ruby" "#+begin_src ruby\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("tclf" "#+end_src\n?\n#+begin_src tcl" "<src 
lang=\"?\">\n\n</src>")
                                ("tcl" "#+begin_src tcl\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("hsf" "#+end_src\n?\n#+begin_src haskell" 
"<src lang=\"?\">\n\n</src>")
                                ("hs" "#+begin_src haskell\n?\n#+end_src" "<src 
lang=\"?\">\n\n</src>")
                                ("xmonadf" "#+end_src\n?\n#+begin_src haskell 
:tangle \"~/.xmonad/xmonad.hs\""
                                 "<src lang=\"?\">\n\n</src>")
                                ("xmonad" "#+begin_src haskell :tangle 
\"~/.xmonad/xmonad.hs\"\n?\n#+end_src"
                                 "<src lang=\"?\">\n\n</src>")
                                ("conff" "#+end_src\n?\n#+begin_src conf 
:tangle " "<src lang=\"?\">\n\n</src>")
                                ("conf" "#+begin_src conf :tangle 
\n?\n#+end_src" "<src lang=\"?\">\n\n</src>")
                                ("confuf" "#+end_src\n?\n#+begin_src conf-unix 
:tangle " "<src lang=\"?\">\n\n</src>")
                                ("confu" "#+begin_src conf-unix :tangle 
\n?\n#+end_src" "<src lang=\"?\">\n\n</src>")
                                ("confxf" "#+end_src\n?\n#+begin_src 
conf-xdefaults :tangle " "<src lang=\"?\">\n\n</src>")
                                ("confx" "#+begin_src conf-xdefaults :tangle 
\n?\n#+end_src" "<src lang=\"?\">\n\n</src>"))
 org-babel-load-languages '((scheme . t) (lisp . t) (emacs-lisp . t) (coq . t))
 org-html-format-inlinetask-function 
'org-html-format-inlinetask-default-function
 org-agenda-files "~/.org-agenda-files"
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 org-confirm-babel-evaluate nil
 )

Reply via email to