From mboxrd@z Thu Jan 1 00:00:00 1970 From: Eric Schulte Subject: Re: URGENT Bug with exporting org source block Date: Sun, 01 Apr 2012 08:43:32 -0400 Message-ID: <87bonbwrjn.fsf@gmx.com> References: <87k420u9qo.fsf@gmx.com> <87vcljq5rt.fsf@Rainer.invalid> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Return-path: Received: from eggs.gnu.org ([208.118.235.92]:33424) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1SEM0n-0000xa-S2 for emacs-orgmode@gnu.org; Sun, 01 Apr 2012 10:44:11 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1SEM0l-0006EZ-Jr for emacs-orgmode@gnu.org; Sun, 01 Apr 2012 10:44:09 -0400 Received: from mailout-us.gmx.com ([74.208.5.67]:52143 helo=mailout-us.mail.com) by eggs.gnu.org with smtp (Exim 4.71) (envelope-from ) id 1SEM0l-0006EQ-ED for emacs-orgmode@gnu.org; Sun, 01 Apr 2012 10:44:07 -0400 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: Achim Gratz Cc: emacs-orgmode@gnu.org Achim Gratz writes: > Eric Schulte writes: > [...] > > With your latest changes I get this test regression (I have not checked > which commit is responsible): > This is odd. The first time I ran the test suite this test failed for me as well, however on all subsequent runs of the test suite this test passed, and manually looking through the test the code indeed does seem to be acting as it should. Best, > > Test ob-exp/noweb-on-export-with-exports-results backtrace: > <(357 nil) > apply(< (357 nil)) > (setq value-605 (apply fn-603 args-604)) > (unwind-protect (setq value-605 (apply fn-603 args-604)) (setq form- > (if (unwind-protect (setq value-605 (apply fn-603 args-604)) (setq f > (unless (unwind-protect (setq value-605 (apply fn-603 args-604)) (se > (let (form-description-607) (unless (unwind-protect (setq value-605=20 > (let ((value-605 (quote ert-form-evaluation-aborted-606))) (let (for > (let ((fn-603 (function <)) (args-604 (list test-point (re-search-fo > (should (< test-point (re-search-forward x nil t))) > (lambda (x) (should (< test-point (re-search-forward x nil t))) (set > mapcar((lambda (x) (should (< test-point (re-search-forward x nil t) > (setq G93507 (mapcar (lambda (x) (should (< test-point (re-search-fo > (let ((kill-buffer-query-functions nil) G93507) (with-temp-file "/tm > (org-test-with-temp-text-in-file exported-html (mapcar (lambda (x) ( > (let ((exported-html (org-export-as-html nil nil nil (quote string)=20 > (save-restriction (org-narrow-to-subtree) (let ((exported-html (org- > (progn (org-id-goto "8701beb4-13d9-468c-997a-8e63e8b66f8d") (setq to > (unwind-protect (progn (org-id-goto "8701beb4-13d9-468c-997a-8e63e8b > (let ((save-match-data-internal (match-data))) (unwind-protect (prog > (save-match-data (org-id-goto "8701beb4-13d9-468c-997a-8e63e8b66f8d" > (progn (save-match-data (org-id-goto "8701beb4-13d9-468c-997a-8e63e8 > (unwind-protect (progn (save-match-data (org-id-goto "8701beb4-13d9- > (let ((wconfig (current-window-configuration))) (unwind-protect (pro > (save-window-excursion (save-match-data (org-id-goto "8701beb4-13d9- > (let* ((id-location (org-id-find "8701beb4-13d9-468c-997a-8e63e8b66f > (org-test-at-id "8701beb4-13d9-468c-997a-8e63e8b66f8d" (org-narrow-t > (lambda nil (org-test-at-id "8701beb4-13d9-468c-997a-8e63e8b66f8d" ( > byte-code("\306\307!=E2=96=92q\210\310\216\311 \312\216\313\314\315\316= \3 > ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc > byte-code("\306\307!\211=E2=96=92r\310\311!q\210\312 d\313\223)L\210\31= 4\216 > ert-run-test([cl-struct-ert-test ob-exp/noweb-on-export-with-exports > ert-run-or-rerun-test([cl-struct-ert--stats "\\(org\\|ob\\)" [[cl-st > ert-run-tests("\\(org\\|ob\\)" #[(event-type &rest event-args) \30 > ert-run-tests-batch("\\(org\\|ob\\)") > ert-run-tests-batch-and-exit("\\(org\\|ob\\)") > (let ((org-id-track-globally t) (org-id-locations-file (convert-stan > org-test-run-batch-tests() > call-interactively(org-test-run-batch-tests nil nil) > command-execute(org-test-run-batch-tests) > command-line-1(("-L" "lisp/" "-L" "testing/" "--eval" "(defconst org > command-line() > normal-top-level() > Test ob-exp/noweb-on-export-with-exports-results condition: > (wrong-type-argument number-or-marker-p nil) > FAILED 21/193 ob-exp/noweb-on-export-with-exports-results > > > Regards, > Achim. --=20 Eric Schulte http://cs.unm.edu/~eschulte/