From mboxrd@z Thu Jan 1 00:00:00 1970 From: Titus von der Malsburg Subject: Re: Bug: org-babel-tangle fails with :comments org [8.3beta (release_8.3beta-1286-g20795f @ /home/malsburg/usr/share/emacs/site-lisp/org/)] Date: Sun, 31 Jan 2016 12:37:10 -0800 Message-ID: <87egcxxz7t.fsf@posteo.de> References: <87zivlikad.fsf@posteo.de> Mime-Version: 1.0 Content-Type: multipart/signed; boundary="=-=-="; micalg=pgp-sha1; protocol="application/pgp-signature" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:45697) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1aPykI-0006Rx-0T for emacs-orgmode@gnu.org; Sun, 31 Jan 2016 15:37:20 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1aPykE-0007lW-MY for emacs-orgmode@gnu.org; Sun, 31 Jan 2016 15:37:17 -0500 Received: from mout01.posteo.de ([185.67.36.65]:35061) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1aPykE-0007lP-AB for emacs-orgmode@gnu.org; Sun, 31 Jan 2016 15:37:14 -0500 Received: from dovecot03.posteo.de (dovecot03.posteo.de [172.16.0.13]) by mout01.posteo.de (Postfix) with ESMTPS id C55CC20A7C for ; Sun, 31 Jan 2016 21:37:13 +0100 (CET) Received: from mail.posteo.de (localhost [127.0.0.1]) by dovecot03.posteo.de (Postfix) with ESMTPSA id 3ptkjN73hWz5vN8 for ; Sun, 31 Jan 2016 21:37:12 +0100 (CET) In-reply-to: <87zivlikad.fsf@posteo.de> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org --=-=-= Content-Type: text/plain Content-Transfer-Encoding: quoted-printable There were apparently bad characters in the backtrace. Sorry about that. Below it is again, plus my org config. Debugger entered--Lisp error: (error "Nothing to comment") signal(error ("Nothing to comment")) error("Nothing to comment") comment-region-default(1 3 nil) comment-region(1 3) #[(text) "\205S.\306\230?\205S. G\307V\205S.\n\203.. c\207\310` \311..\= 312\313!\2030.\313\307\fG\311\f$\210\202G.=0B\203?.\314\307\fG.\f$\210\202G= .\313\307\fG\311\f$\210\f*c\210`\"\210\311\210\315c\207" [comments text or= g-babel-tangle-uncomment-comments restricted s org-rm-props "no" 0 comment-= region nil fboundp set-text-properties remove-text-properties "\n"] 7]("\n\= n") org-babel-spec-to-string((12 "/tmp/test2.org" "file:/tmp/test2.org::*Test= " Test:2 ((:colname-names) (:rowname-names) (:result-params "replace") (:re= sult-type . value) (:comments . "org") (:shebang . "") (:cache . "no") (:pa= dline . "") (:noweb . "no") (:tangle . "yes") (:exports . "code") (:results= . "replace") (:hlines . "no") (:session . "none")) "message(2)" "\n\n")) #[(spec) "\306\211.\307!.\310!\211.G\311V\205..\n).\312!. \313\230\203&= .\314.A@!\2028. \315\230\2030.\316\2028. G\311V\2058. \211.*\205T..+\203R. = \313\230\203R..*\317.+Q\202T..*\211.,\205A.\320!\321.,!.-\211..\203{..-\20= 3{...\315\230\204{.\322.-\323\"\210*\324.,!\203\223..,\325\326./\"\235\204\= 223.\327.,!\210\330\331!.0r.0q\210\332\216\333.1!\203\266.\3341\261..1 0\20= 2\265.\210\202\266.\210=0B\203\316..,.2\235\204\316.=0B\335Pc\210.,.2B.2\33= 6.!\210\337 .3\330\331!.4r.4q\210\340\216\324.,!\203\356.\341.,!\210db\210\= 342\343\344.8\"A\315\230\204..`eU\204..\335c\210.3c\210\345\316\211.,#\210.= =07=0B\203..\f\204..\346..5T.5.,\fB.6\347.6./\350\351$\2038../\202@..6./B\2= 11./)..\207" [get-spec tangle sheb she-bang tangle-mode spec #[(name) "\302= \303 8\"A\207" [name spec assoc 4] 4] :tangle :shebang 0 :tangle-mode "yes= " file-name-sans-extension "no" nil "." :mkdirp file-name-directory make-di= rectory parents file-exists-p mapcar car delete-file generate-new-buffer " = *temp*" #[nil "\301!\205 .\302!\207" [temp-buffer buffer-name kill-buffer= ] 2] fboundp (error) "\n" org-babel-spec-to-string buffer-string #[nil "\30= 1!\205 .\302!\207" [temp-buffer buffer-name kill-buffer] 2] insert-file-c= ontents assoc :padline 4 write-region 493 cl-member :test #[(a b) "@ @\232= \207" [a b] 2] base-name ext file-name fnd m path-collector temp-buffer lan= g-f ...] 6]((12 "/tmp/test2.org" "file:/tmp/test2.org::*Test" Test:2 ((:col= name-names) (:rowname-names) (:result-params "replace") (:result-type . val= ue) (:comments . "org") (:shebang . "") (:cache . "no") (:padline . "") (:n= oweb . "no") (:tangle . "yes") (:exports . "code") (:results . "replace") (= :hlines . "no") (:session . "none")) "message(2)" "\n\n")) mapc(#[(spec) "\306\211.\307!.\310!\211.G\311V\205..\n).\312!. \313\230= \203&.\314.A@!\2028. \315\230\2030.\316\2028. G\311V\2058. \211.*\205T..+\2= 03R. \313\230\203R..*\317.+Q\202T..*\211.,\205A.\320!\321.,!.-\211..\203{.= .-\203{...\315\230\204{.\322.-\323\"\210*\324.,!\203\223..,\325\326./\"\235= \204\223.\327.,!\210\330\331!.0r.0q\210\332\216\333.1!\203\266.\3341\261..1= 0\202\265.\210\202\266.\210=0B\203\316..,.2\235\204\316.=0B\335Pc\210.,.2B= .2\336.!\210\337 .3\330\331!.4r.4q\210\340\216\324.,!\203\356.\341.,!\210db= \210\342\343\344.8\"A\315\230\204..`eU\204..\335c\210.3c\210\345\316\211.,#= \210.=07=0B\203..\f\204..\346..5T.5.,\fB.6\347.6./\350\351$\2038../\202@..6= ./B\211./)..\207" [get-spec tangle sheb she-bang tangle-mode spec #[(name) = "\302\303 8\"A\207" [name spec assoc 4] 4] :tangle :shebang 0 :tangle-mode= "yes" file-name-sans-extension "no" nil "." :mkdirp file-name-directory ma= ke-directory parents file-exists-p mapcar car delete-file generate-new-buff= er " *temp*" #[nil "\301!\205 .\302!\207" [temp-buffer buffer-name kill-b= uffer] 2] fboundp (error) "\n" org-babel-spec-to-string buffer-string #[nil= "\301!\205 .\302!\207" [temp-buffer buffer-name kill-buffer] 2] insert-f= ile-contents assoc :padline 4 write-region 493 cl-member :test #[(a b) "@ = @\232\207" [a b] 2] base-name ext file-name fnd m path-collector temp-buffe= r lang-f ...] 6] ((8 "/tmp/test2.org" "file:/tmp/test2.org::*Test" Test:1 (= (:colname-names) (:rowname-names) (:result-params "replace") (:result-type = . value) (:comments . "org") (:shebang . "") (:cache . "no") (:padline . ""= ) (:noweb . "no") (:tangle . "yes") (:exports . "code") (:results . "replac= e") (:hlines . "no") (:session . "none")) "message(1)" "Test\n\nText for te= sting.\n\n") (12 "/tmp/test2.org" "file:/tmp/test2.org::*Test" Test:2 ((:co= lname-names) (:rowname-names) (:result-params "replace") (:result-type . va= lue) (:comments . "org") (:shebang . "") (:cache . "no") (:padline . "") (:= noweb . "no") (:tangle . "yes") (:exports . "code") (:results . "replace") = (:hlines . "no") (:session . "none")) "message(2)" "\n\n"))) #[(by-lang) "@.A.\306 =0B\"A\206.. .\307\306 .\"A\203#.\310\306 .\"A!\2= 06$. \311P!..\312..\313\314\n\"-\207" [by-lang lang specs org-babel-tangle-= lang-exts ext org-src-lang-modes assoc intern symbol-name "-mode" nil mapc = #[(spec) "\306\211.\307!.\310!\211.G\311V\205..\n).\312!. \313\230\203&.\= 314.A@!\2028. \315\230\2030.\316\2028. G\311V\2058. \211.*\205T..+\203R. \3= 13\230\203R..*\317.+Q\202T..*\211.,\205A.\320!\321.,!.-\211..\203{..-\203{= ...\315\230\204{.\322.-\323\"\210*\324.,!\203\223..,\325\326./\"\235\204\22= 3.\327.,!\210\330\331!.0r.0q\210\332\216\333.1!\203\266.\3341\261..1 0\202\= 265.\210\202\266.\210=0B\203\316..,.2\235\204\316.=0B\335Pc\210.,.2B.2\336.= !\210\337 .3\330\331!.4r.4q\210\340\216\324.,!\203\356.\341.,!\210db\210\34= 2\343\344.8\"A\315\230\204..`eU\204..\335c\210.3c\210\345\316\211.,#\210.= =07=0B\203..\f\204..\346..5T.5.,\fB.6\347.6./\350\351$\2038../\202@..6./B\2= 11./)..\207" [get-spec tangle sheb she-bang tangle-mode spec #[(name) "\302= \303 8\"A\207" [name spec assoc 4] 4] :tangle :shebang 0 :tangle-mode "yes= " file-name-sans-extension "no" nil "." :mkdirp file-name-directory make-di= rectory parents file-exists-p mapcar car delete-file generate-new-buffer " = *temp*" #[nil "\301!\205 .\302!\207" [temp-buffer buffer-name kill-buffer= ] 2] fboundp (error) "\n" org-babel-spec-to-string buffer-string #[nil "\30= 1!\205 .\302!\207" [temp-buffer buffer-name kill-buffer] 2] insert-file-c= ontents assoc :padline 4 write-region 493 cl-member :test #[(a b) "@ @\232= \207" [a b] 2] base-name ext file-name fnd m path-collector temp-buffer lan= g-f ...] 6] lang-f she-banged] 5](("R" (8 "/tmp/test2.org" "file:/tmp/test2= .org::*Test" Test:1 ((:colname-names) (:rowname-names) (:result-params "rep= lace") (:result-type . value) (:comments . "org") (:shebang . "") (:cache .= "no") (:padline . "") (:noweb . "no") (:tangle . "yes") (:exports . "code"= ) (:results . "replace") (:hlines . "no") (:session . "none")) "message(1)"= "Test\n\nText for testing.\n\n") (12 "/tmp/test2.org" "file:/tmp/test2.org= ::*Test" Test:2 ((:colname-names) (:rowname-names) (:result-params "replace= ") (:result-type . value) (:comments . "org") (:shebang . "") (:cache . "no= ") (:padline . "") (:noweb . "no") (:tangle . "yes") (:exports . "code") (:= results . "replace") (:hlines . "no") (:session . "none")) "message(2)" "\n= \n"))) mapc(#[(by-lang) "@.A.\306 =0B\"A\206.. .\307\306 .\"A\203#.\310\306 .\= "A!\206$. \311P!..\312..\313\314\n\"-\207" [by-lang lang specs org-babel-ta= ngle-lang-exts ext org-src-lang-modes assoc intern symbol-name "-mode" nil = mapc #[(spec) "\306\211.\307!.\310!\211.G\311V\205..\n).\312!. \313\230\2= 03&.\314.A@!\2028. \315\230\2030.\316\2028. G\311V\2058. \211.*\205T..+\203= R. \313\230\203R..*\317.+Q\202T..*\211.,\205A.\320!\321.,!.-\211..\203{..-= \203{...\315\230\204{.\322.-\323\"\210*\324.,!\203\223..,\325\326./\"\235\2= 04\223.\327.,!\210\330\331!.0r.0q\210\332\216\333.1!\203\266.\3341\261..1 0= \202\265.\210\202\266.\210=0B\203\316..,.2\235\204\316.=0B\335Pc\210.,.2B.2= \336.!\210\337 .3\330\331!.4r.4q\210\340\216\324.,!\203\356.\341.,!\210db\2= 10\342\343\344.8\"A\315\230\204..`eU\204..\335c\210.3c\210\345\316\211.,#\2= 10.=07=0B\203..\f\204..\346..5T.5.,\fB.6\347.6./\350\351$\2038../\202@..6./= B\211./)..\207" [get-spec tangle sheb she-bang tangle-mode spec #[(name) "\= 302\303 8\"A\207" [name spec assoc 4] 4] :tangle :shebang 0 :tangle-mode "= yes" file-name-sans-extension "no" nil "." :mkdirp file-name-directory make= -directory parents file-exists-p mapcar car delete-file generate-new-buffer= " *temp*" #[nil "\301!\205 .\302!\207" [temp-buffer buffer-name kill-buf= fer] 2] fboundp (error) "\n" org-babel-spec-to-string buffer-string #[nil "= \301!\205 .\302!\207" [temp-buffer buffer-name kill-buffer] 2] insert-fil= e-contents assoc :padline 4 write-region 493 cl-member :test #[(a b) "@ @\= 232\207" [a b] 2] base-name ext file-name fnd m path-collector temp-buffer = lang-f ...] 6] lang-f she-banged] 5] (("R" (8 "/tmp/test2.org" "file:/tmp/t= est2.org::*Test" Test:1 ((:colname-names) (:rowname-names) (:result-params = "replace") (:result-type . value) (:comments . "org") (:shebang . "") (:cac= he . "no") (:padline . "") (:noweb . "no") (:tangle . "yes") (:exports . "c= ode") (:results . "replace") (:hlines . "no") (:session . "none")) "message= (1)" "Test\n\nText for testing.\n\n") (12 "/tmp/test2.org" "file:/tmp/test2= .org::*Test" Test:2 ((:colname-names) (:rowname-names) (:result-params "rep= lace") (:result-type . value) (:comments . "org") (:shebang . "") (:cache .= "no") (:padline . "") (:noweb . "no") (:tangle . "yes") (:exports . "code"= ) (:results . "replace") (:hlines . "no") (:session . "none")) "message(2)"= "\n\n")))) org-babel-tangle(nil) funcall-interactively(org-babel-tangle nil) call-interactively(org-babel-tangle record nil) command-execute(org-babel-tangle record) helm-M-x(nil "org-babel-tangle") funcall-interactively(helm-M-x nil "org-babel-tangle") call-interactively(helm-M-x nil nil) command-execute(helm-M-x) Emacs : GNU Emacs 25.0.50.1 (x86_64-unknown-linux-gnu, GTK+ Version 3.14.1= 3) of 2016-01-18 Package: Org-mode version 8.3.3 (release_8.3.3-523-ga90424 @ /home/malsburg= /usr/share/emacs/site-lisp/org/) current state: =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D (setq org-tab-first-hook '(org-hide-block-toggle-maybe org-babel-hide-result-tog= gle-maybe org-babel-header-arg-expand) org-latex-classes '(("g-brief" "\\documentclass[12pt]{g-brief}" ("\\sectio= n{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}= " . "\\subsubsection*{%s}") ("\\paragraph{%s}" . "\\paragraph*{%s}") ("\\subparagraph{%s}" .= "\\subparagraph*{%s}")) ("beamerposter" "\\documentclass[final,hyperref=3D{pdfpagelabels=3Dfalse}]{beame= r}\n \\usepackage{times}\n \\usepackage{amsmath,amsthm, amssymb, la= texsym}\n \\boldmath\n \\renewcommand\\maketitle{}\n \\usepacka= ge[english]{babel}\n \\usepackage[utf8]{inputenc}\n \\usepackage[or= ientation=3Dportrait,size=3Da0,scale=3D1.4,debug]{beamerposter}\n [NO-D= EFAULT-PACKAGES]" ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\su= bsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}") ("\\paragraph{%= s}" . "\\paragraph*{%s}") ("\\subparagraph{%s}" . "\\subparagraph*{%s}")) ("letter" "\\documentclass[12pt]{letter}" ("\\section{%s}" . "\\= section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}= " . "\\subsubsection*{%s}") ("\\paragraph{%s}" . "\\paragraph*{%s}") ("\\subparagraph{%s}" .= "\\subparagraph*{%s}")) ("article" "\\documentclass[11pt]{article}" ("\\section{%s}" . "= \\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}= " . "\\subsubsection*{%s}") ("\\paragraph{%s}" . "\\paragraph*{%s}") ("\\subparagraph{%s}" .= "\\subparagraph*{%s}")) ("report" "\\documentclass[11pt]{report}" ("\\part{%s}" . "\\par= t*{%s}") ("\\chapter{%s}" . "\\chapter*{%s}") ("\\section{%s}" . "\\secti= on*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}= " . "\\subsubsection*{%s}")) ("book" "\\documentclass[11pt]{book}" ("\\part{%s}" . "\\part*{%= s}") ("\\chapter{%s}" . "\\chapter*{%s}") ("\\section{%s}" . "\\secti= on*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}= " . "\\subsubsection*{%s}")) ) org-contacts-files '("/home/malsburg/Essentials/documents/contacts.org") org-speed-command-hook '(org-speed-command-default-hook org-babel-speed-co= mmand-hook) org-reverse-note-order t org-occur-hook '(org-first-headline-recenter) org-metaup-hook '(org-babel-load-in-session-maybe) org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"] org-log-done t 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-latex-pdf-process '("pdflatex -interaction nonstopmode -output-directo= ry %o %f" "biber `basename %f .tex`" "pdflatex -interaction nonstopmode -output-directory %o %f" "pdflatex -interaction nonstopmode -output-directory %o %f") org-latex-format-headline-function 'org-latex-format-headline-default-func= tion org-default-notes-file "/home/malsburg/Essentials/documents/all.org" org-todo-keyword-faces '(("WAIT" . "orange")) org-capture-templates '(("b" "BibTeX article" plain (file "/home/malsburg/Documents/Uni/Bibliographie/bibliography= .bib") "@article{%^{BibTeX key},\n author =3D {%^{author}},\n title= =3D {%^{title}},\n journal =3D {%^{journal}},\n volume =3D {%^{volume}},= \n number =3D {%^{number}},\n pages =3D {%^{pages}},\n year =3D {%^{year= }},\n doi =3D {%^{doi}},\n keywords =3D {%^{keywords}},\n abstract =3D {= }\n}" :prepend nil) ("c" "Org-contact" entry (file tmalsburg-contacts-file :prepen= d nil) "* %?\n :PROPERTIES:\n :N: SURNAME;GIVEN;MIDDLE;PREFIX;SUFFI= X\n :PHOTO: URI\n :BDAY:\n :ADDRESS: (WORK, pref)\n :PHONE: (CELL, VOIC= E)\n :PHONE: (WORK, FAX)\n :EMAIL: (INTERNET, WORK, pref)\n :TITLE:\n := ROLE:\n :ORG: DEPT;INST;* \n :URL: \n :NOTE:\n :REV: %t\n :END:\n" :pr= epend nil) ("i" "Idiom" entry (file "/home/malsburg/Documents/Sprachen/English/idioms.org" := prepend nil) "* %?\n %i") ("j" "Journal" entry (file+olp tmalsburg-agenda-file "Journal"= ) "* %? %T\n %i" :prepend t) ("n" "Notes" entry (file+olp tmalsburg-agenda-file "Notes") "*= %? %t\n %i" :prepend t) ("p" "Password" entry (file+olp tmalsburg-secrets-file "Websei= ten and Email accounts") "* %?") ("t" "To do" entry (file+olp tmalsburg-agenda-file "Agenda" "T= ODO") "* TODO %?\n %i" :prepend t) ("m" "May do" entry (file+olp tmalsburg-agenda-file "Agenda" "= MAYDO") "* MAYDO %?\n %i" :prepend t) ("r" "To read" entry (file+olp tmalsburg-agenda-file "Agenda" = "READ") "* READ %?\n %i" :prepend t) ("d" "Done" entry (file+olp tmalsburg-agenda-file "Agenda" "DO= NE") "* DONE %?\n CLOSED: %U\n %i" :prepend t) ) org-after-todo-state-change-hook '(org-clock-out-if-current) org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"] org-capture-mode-hook '(evil-insert-state) org-from-is-user-regexp "\\" org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-confi= gure-edit-buffer) org-agenda-before-write-hook '(org-agenda-add-entry-text) org-babel-pre-tangle-hook '(save-buffer) org-mode-hook '(#[0 "\300\301\302\303\304$\207" [org-add-hook change-major-mode-hook org-show-block-all append lo= cal] 5] #[nil "\300\301\302\303\304$\207" [org-add-hook change-major-mode-hook org-babel-show-result-all ap= pend 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 #[771 ".\207" [] 4 "\n\n(fn NAME CONTENTS= WIDTH)"] 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 o= rg-cycle-show-empty-lines org-optimize-window-after-visibility-change) org-archive-mark-done t org-ditaa-eps-jar-path "/home/malsburg/usr/share/emacs/site-lisp/contrib/s= cripts/DitaaEps.jar" org-todo-keywords '((sequence "TODO" "READ" "MAYDO" "WAIT" "|" "DONE" "NOD= O" "DELEGATED")) org-babel-tangle-lang-exts '(("python" . "py") ("emacs-lisp" . "el") ("eli= sp" . "el")) org-confirm-elisp-link-function 'yes-or-no-p org-metadown-hook '(org-babel-pop-to-session-maybe) org-ditaa-jar-path "/home/malsburg/usr/src/org-mode/contrib/scripts/ditaa.= jar" org-html-format-headline-function 'org-html-format-headline-default-functi= on org-babel-load-languages '((python . t) (emacs-lisp . t) (ditaa . t) (R . = t)) org-src-preserve-indentation t org-html-format-inlinetask-function 'org-html-format-inlinetask-default-fu= nction org-agenda-files '("/home/malsburg/Essentials/documents/all.org") org-clock-out-hook '(org-clock-remove-empty-clock-drawer) org-confirm-babel-evaluate nil ) On 2016-01-31 Sun 12:08, Titus von der Malsburg wrote: > 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. > ------------------------------------------------------------------------ > > I used the following org-mode document: > > #+PROPERTY: header-args:R :tangle yes :comments org >=20=20=20 > * Test >=20=20=20 > Text for testing. >=20=20=20 > #+BEGIN_SRC R > message(1) > #+END_SRC >=20=20=20 > #+BEGIN_SRC R > message(2) > #+END_SRC > > When I `org-babel-tangle', this fails after the first code block is > written. Stacktrace below. Tested with current development versions of > Emacs and org-mode. > > Debugger entered--Lisp error: (error "Nothing to comment") > signal(error ("Nothing to comment")) > error("Nothing to comment") > comment-region-default(1 3 nil) > comment-region(1 3) > #[(text) "\205&\303\230?\205& G\304V\205&\n\203 --=-=-= Content-Type: application/pgp-signature; name="signature.asc" -----BEGIN PGP SIGNATURE----- Version: GnuPG v1 iQEcBAEBAgAGBQJWrnB3AAoJEK40WfPGE2idyEwIAMtTz2SvaisSjvq00cnRGass 0nSj44oyyAhkp6TSJ9rTPP8LTqgq4jg/9ITGVTUCjT0TymuVWk/VlZpfQOnLFjFp pQJ4q+SO+z+4HpkKs2bgbDMlq6PPZysnNKHe2VJfG87Jm0Gug6PqhAqjaDojIvWN 6KjXOW0rtv9LiygQhMV6DAOpPWk31EIZk5UfKUPLS8261LMYv9nsjhuww4wsmxX1 1yNi0ktr9A8IFN8GPu4O62QRcyqy8q++WQBtd2/2XFgObnnbLObwE24XKhWN1XGJ qEvZMSrqzAD9nD8pfYneMfKB9BzKBIjOcTUa74vXd1/qPF5kFYgu3vqix47XCmI= =RubP -----END PGP SIGNATURE----- --=-=-=--