From mboxrd@z Thu Jan 1 00:00:00 1970 From: Achim Gratz Subject: Re: [Bug] Tests for experimental org-features should expect to fail if not activated by the user Date: Sat, 03 Mar 2012 18:28:55 +0100 Message-ID: <87d38tr3u0.fsf@Rainer.invalid> References: <87ipit5onv.fsf@Rainer.invalid> <87linlbokm.fsf@gmx.com> <87hay9z9mz.fsf@Rainer.invalid> <87r4xd8irg.fsf@gmx.com> <87linkow9d.fsf@Rainer.invalid> <87fwdrxf5u.fsf@gmail.com> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: 8bit Return-path: Received: from eggs.gnu.org ([208.118.235.92]:58984) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1S3slb-0004Ut-8I for emacs-orgmode@gnu.org; Sat, 03 Mar 2012 12:29:31 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1S3slX-0007Tm-UR for emacs-orgmode@gnu.org; Sat, 03 Mar 2012 12:29:10 -0500 Received: from plane.gmane.org ([80.91.229.3]:37877) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1S3slX-0007T7-G2 for emacs-orgmode@gnu.org; Sat, 03 Mar 2012 12:29:07 -0500 Received: from list by plane.gmane.org with local (Exim 4.69) (envelope-from ) id 1S3slV-0001xs-W2 for emacs-orgmode@gnu.org; Sat, 03 Mar 2012 18:29:05 +0100 Received: from pd9eb2453.dip.t-dialin.net ([217.235.36.83]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Sat, 03 Mar 2012 18:29:05 +0100 Received: from Stromeko by pd9eb2453.dip.t-dialin.net with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Sat, 03 Mar 2012 18:29:05 +0100 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 Two test failures in current HEAD: --8<---------------cut here---------------start------------->8--- Test test-org-footnote/normalize-outside-org backtrace: org-footnote-in-valid-context-p() org-footnote-at-reference-p() byte-code(\20\304\202 \305 \n\306#\204\307\310\311\"\21\20 org-footnote-get-next-reference() org-footnote-normalize() (let ((major-mode (quote message-mode))) (org-footnote-normalize)) (progn (insert "Body[fn::def]\n-- \nFake signature\n-- \nSignature") (unwind-protect (progn (insert "Body[fn::def]\n-- \nFake signature\n (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (with-current-buffer temp-buffer (unwind-protect (progn (insert "Bod (let ((temp-buffer (generate-new-buffer " *temp*"))) (with-current-b (with-temp-buffer (insert "Body[fn::def]\n-- \nFake signature\n-- \n (let ((org-footnote-tag-for-non-org-mode-files nil) (message-signatu (lambda nil (let ((org-footnote-tag-for-non-org-mode-files nil)) (wi byte-code("\306\307!▒q\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▒r\310\311!q\210\312 d\313\223)L\210\314\216 ert-run-test([cl-struct-ert-test test-org-footnote/normalize-outside 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 test-org-footnote/normalize-outside-org condition: (void-variable message-cite-prefix-regexp) FAILED 166/192 test-org-footnote/normalize-outside-org --8<---------------cut here---------------end--------------->8--- --8<---------------cut here---------------start------------->8--- Test test-org-export/export-scope backtrace: signal(ert-test-failed (((should (equal (org-export-as (quote test)) ert-fail(((should (equal (org-export-as (quote test)) "text\n")) :fo (if (unwind-protect (setq value-2005 (apply fn-2003 args-2004)) (set (unless (unwind-protect (setq value-2005 (apply fn-2003 args-2004)) (let (form-description-2007) (unless (unwind-protect (setq value-200 (let ((value-2005 (quote ert-form-evaluation-aborted-2006))) (let (f (let ((fn-2003 (function equal)) (args-2004 (list (org-export-as (qu (should (equal (org-export-as (quote test)) "text\n")) (progn (fset (quote org-test-center-block) (function* (lambda (obj c (unwind-protect (progn (fset (quote org-test-center-block) (function (let* ((--cl-letf-bound-- (fboundp (quote org-test-center-block))) ( (letf (((symbol-function (quote org-test-center-block)) (function* ( (progn (fset (quote org-test-comment) (function* (lambda (obj conten (unwind-protect (progn (fset (quote org-test-comment) (function* (la (let* ((--cl-letf-bound-- (fboundp (quote org-test-comment))) (--cl- (letf (((symbol-function (quote org-test-comment)) (function* (lambd (progn (fset (quote org-test-comment-block) (function* (lambda (obj (unwind-protect (progn (fset (quote org-test-comment-block) (functio (let* ((--cl-letf-bound-- (fboundp (quote org-test-comment-block))) (letf (((symbol-function (quote org-test-comment-block)) (function* (progn (fset (quote org-test-drawer) (function* (lambda (obj content (unwind-protect (progn (fset (quote org-test-drawer) (function* (lam (let* ((--cl-letf-bound-- (fboundp (quote org-test-drawer))) (--cl-l (letf (((symbol-function (quote org-test-drawer)) (function* (lambda (progn (fset (quote org-test-dynamic-block) (function* (lambda (obj (unwind-protect (progn (fset (quote org-test-dynamic-block) (functio (let* ((--cl-letf-bound-- (fboundp (quote org-test-dynamic-block))) (letf (((symbol-function (quote org-test-dynamic-block)) (function* (progn (fset (quote org-test-example-block) (function* (lambda (obj (unwind-protect (progn (fset (quote org-test-example-block) (functio (let* ((--cl-letf-bound-- (fboundp (quote org-test-example-block))) (letf (((symbol-function (quote org-test-example-block)) (function* (progn (fset (quote org-test-export-block) (function* (lambda (obj c (unwind-protect (progn (fset (quote org-test-export-block) (function (let* ((--cl-letf-bound-- (fboundp (quote org-test-export-block))) ( (letf (((symbol-function (quote org-test-export-block)) (function* ( (progn (fset (quote org-test-fixed-width) (function* (lambda (obj co (unwind-protect (progn (fset (quote org-test-fixed-width) (function* (let* ((--cl-letf-bound-- (fboundp (quote org-test-fixed-width))) (- (letf (((symbol-function (quote org-test-fixed-width)) (function* (l (progn (fset (quote org-test-footnote-definition) (function* (lambda (unwind-protect (progn (fset (quote org-test-footnote-definition) (f (let* ((--cl-letf-bound-- (fboundp (quote org-test-footnote-definiti (letf (((symbol-function (quote org-test-footnote-definition)) (func (progn (fset (quote org-test-headline) (function* (lambda (obj conte (unwind-protect (progn (fset (quote org-test-headline) (function* (l (let* ((--cl-letf-bound-- (fboundp (quote org-test-headline))) (--cl (letf (((symbol-function (quote org-test-headline)) (function* (lamb (progn (fset (quote org-test-horizontal-rule) (function* (lambda (ob (unwind-protect (progn (fset (quote org-test-horizontal-rule) (funct (let* ((--cl-letf-bound-- (fboundp (quote org-test-horizontal-rule)) (letf (((symbol-function (quote org-test-horizontal-rule)) (function (progn (fset (quote org-test-inlinetask) (function* (lambda (obj con (unwind-protect (progn (fset (quote org-test-inlinetask) (function* (let* ((--cl-letf-bound-- (fboundp (quote org-test-inlinetask))) (-- (letf (((symbol-function (quote org-test-inlinetask)) (function* (la (progn (fset (quote org-test-item) (function* (lambda (obj contents (unwind-protect (progn (fset (quote org-test-item) (function* (lambd (let* ((--cl-letf-bound-- (fboundp (quote org-test-item))) (--cl-let (letf (((symbol-function (quote org-test-item)) (function* (lambda ( (progn (fset (quote org-test-keyword) (function* (lambda (obj conten (unwind-protect (progn (fset (quote org-test-keyword) (function* (la (let* ((--cl-letf-bound-- (fboundp (quote org-test-keyword))) (--cl- (letf (((symbol-function (quote org-test-keyword)) (function* (lambd (progn (fset (quote org-test-latex-environment) (function* (lambda ( (unwind-protect (progn (fset (quote org-test-latex-environment) (fun (let* ((--cl-letf-bound-- (fboundp (quote org-test-latex-environment (letf (((symbol-function (quote org-test-latex-environment)) (functi (progn (fset (quote org-test-babel-call) (function* (lambda (obj con (unwind-protect (progn (fset (quote org-test-babel-call) (function* (let* ((--cl-letf-bound-- (fboundp (quote org-test-babel-call))) (-- (letf (((symbol-function (quote org-test-babel-call)) (function* (la (progn (fset (quote org-test-paragraph) (function* (lambda (obj cont (unwind-protect (progn (fset (quote org-test-paragraph) (function* ( (let* ((--cl-letf-bound-- (fboundp (quote org-test-paragraph))) (--c (letf (((symbol-function (quote org-test-paragraph)) (function* (lam (progn (fset (quote org-test-plain-list) (function* (lambda (obj con (unwind-protect (progn (fset (quote org-test-plain-list) (function* (let* ((--cl-letf-bound-- (fboundp (quote org-test-plain-list))) (-- (letf (((symbol-function (quote org-test-plain-list)) (function* (la (progn (fset (quote org-test-property-drawer) (function* (lambda (ob (unwind-protect (progn (fset (quote org-test-property-drawer) (funct (let* ((--cl-letf-bound-- (fboundp (quote org-test-property-drawer)) (letf (((symbol-function (quote org-test-property-drawer)) (function (progn (fset (quote org-test-quote-block) (function* (lambda (obj co (unwind-protect (progn (fset (quote org-test-quote-block) (function* (let* ((--cl-letf-bound-- (fboundp (quote org-test-quote-block))) (- (letf (((symbol-function (quote org-test-quote-block)) (function* (l (progn (fset (quote org-test-quote-section) (function* (lambda (obj (unwind-protect (progn (fset (quote org-test-quote-section) (functio (let* ((--cl-letf-bound-- (fboundp (quote org-test-quote-section))) (letf (((symbol-function (quote org-test-quote-section)) (function* (progn (fset (quote org-test-section) (function* (lambda (obj conten (unwind-protect (progn (fset (quote org-test-section) (function* (la (let* ((--cl-letf-bound-- (fboundp (quote org-test-section))) (--cl- (letf (((symbol-function (quote org-test-section)) (function* (lambd (progn (fset (quote org-test-special-block) (function* (lambda (obj (unwind-protect (progn (fset (quote org-test-special-block) (functio (let* ((--cl-letf-bound-- (fboundp (quote org-test-special-block))) (letf (((symbol-function (quote org-test-special-block)) (function* (progn (fset (quote org-test-src-block) (function* (lambda (obj cont (unwind-protect (progn (fset (quote org-test-src-block) (function* ( (let* ((--cl-letf-bound-- (fboundp (quote org-test-src-block))) (--c (letf (((symbol-function (quote org-test-src-block)) (function* (lam (progn (fset (quote org-test-table) (function* (lambda (obj contents (unwind-protect (progn (fset (quote org-test-table) (function* (lamb (let* ((--cl-letf-bound-- (fboundp (quote org-test-table))) (--cl-le (letf (((symbol-function (quote org-test-table)) (function* (lambda (progn (fset (quote org-test-verse-block) (function* (lambda (obj co (unwind-protect (progn (fset (quote org-test-verse-block) (function* (let* ((--cl-letf-bound-- (fboundp (quote org-test-verse-block))) (- (letf (((symbol-function (quote org-test-verse-block)) (function* (l (progn (fset (quote org-test-emphasis) (function* (lambda (obj conte (unwind-protect (progn (fset (quote org-test-emphasis) (function* (l (let* ((--cl-letf-bound-- (fboundp (quote org-test-emphasis))) (--cl (letf (((symbol-function (quote org-test-emphasis)) (function* (lamb (progn (fset (quote org-test-entity) (function* (lambda (obj content (unwind-protect (progn (fset (quote org-test-entity) (function* (lam (let* ((--cl-letf-bound-- (fboundp (quote org-test-entity))) (--cl-l (letf (((symbol-function (quote org-test-entity)) (function* (lambda (progn (fset (quote org-test-export-snippet) (function* (lambda (obj (unwind-protect (progn (fset (quote org-test-export-snippet) (functi (let* ((--cl-letf-bound-- (fboundp (quote org-test-export-snippet))) (letf (((symbol-function (quote org-test-export-snippet)) (function* (progn (fset (quote org-test-footnote-reference) (function* (lambda (unwind-protect (progn (fset (quote org-test-footnote-reference) (fu (let* ((--cl-letf-bound-- (fboundp (quote org-test-footnote-referenc (letf (((symbol-function (quote org-test-footnote-reference)) (funct (progn (fset (quote org-test-inline-babel-call) (function* (lambda ( (unwind-protect (progn (fset (quote org-test-inline-babel-call) (fun (let* ((--cl-letf-bound-- (fboundp (quote org-test-inline-babel-call (letf (((symbol-function (quote org-test-inline-babel-call)) (functi (progn (fset (quote org-test-inline-src-block) (function* (lambda (o (unwind-protect (progn (fset (quote org-test-inline-src-block) (func (let* ((--cl-letf-bound-- (fboundp (quote org-test-inline-src-block) (letf (((symbol-function (quote org-test-inline-src-block)) (functio (progn (fset (quote org-test-line-break) (function* (lambda (obj con (unwind-protect (progn (fset (quote org-test-line-break) (function* (let* ((--cl-letf-bound-- (fboundp (quote org-test-line-break))) (-- (letf (((symbol-function (quote org-test-line-break)) (function* (la (progn (fset (quote org-test-latex-fragment) (function* (lambda (obj (unwind-protect (progn (fset (quote org-test-latex-fragment) (functi (let* ((--cl-letf-bound-- (fboundp (quote org-test-latex-fragment))) (letf (((symbol-function (quote org-test-latex-fragment)) (function* (progn (fset (quote org-test-link) (function* (lambda (obj contents (unwind-protect (progn (fset (quote org-test-link) (function* (lambd (let* ((--cl-letf-bound-- (fboundp (quote org-test-link))) (--cl-let (letf (((symbol-function (quote org-test-link)) (function* (lambda ( (progn (fset (quote org-test-macro) (function* (lambda (obj contents (unwind-protect (progn (fset (quote org-test-macro) (function* (lamb (let* ((--cl-letf-bound-- (fboundp (quote org-test-macro))) (--cl-le (letf (((symbol-function (quote org-test-macro)) (function* (lambda (progn (fset (quote org-test-radio-target) (function* (lambda (obj c (unwind-protect (progn (fset (quote org-test-radio-target) (function (let* ((--cl-letf-bound-- (fboundp (quote org-test-radio-target))) ( (letf (((symbol-function (quote org-test-radio-target)) (function* ( (progn (fset (quote org-test-statistics-cookie) (function* (lambda ( (unwind-protect (progn (fset (quote org-test-statistics-cookie) (fun (let* ((--cl-letf-bound-- (fboundp (quote org-test-statistics-cookie (letf (((symbol-function (quote org-test-statistics-cookie)) (functi (progn (fset (quote org-test-subscript) (function* (lambda (obj cont (unwind-protect (progn (fset (quote org-test-subscript) (function* ( (let* ((--cl-letf-bound-- (fboundp (quote org-test-subscript))) (--c (letf (((symbol-function (quote org-test-subscript)) (function* (lam (progn (fset (quote org-test-superscript) (function* (lambda (obj co (unwind-protect (progn (fset (quote org-test-superscript) (function* (let* ((--cl-letf-bound-- (fboundp (quote org-test-superscript))) (- (letf (((symbol-function (quote org-test-superscript)) (function* (l (progn (fset (quote org-test-target) (function* (lambda (obj content (unwind-protect (progn (fset (quote org-test-target) (function* (lam (let* ((--cl-letf-bound-- (fboundp (quote org-test-target))) (--cl-l (letf (((symbol-function (quote org-test-target)) (function* (lambda (progn (fset (quote org-test-time-stamp) (function* (lambda (obj con (unwind-protect (progn (fset (quote org-test-time-stamp) (function* (let* ((--cl-letf-bound-- (fboundp (quote org-test-time-stamp))) (-- (letf (((symbol-function (quote org-test-time-stamp)) (function* (la (progn (fset (quote org-test-verbatim) (function* (lambda (obj conte (unwind-protect (progn (fset (quote org-test-verbatim) (function* (l (let* ((--cl-letf-bound-- (fboundp (quote org-test-verbatim))) (--cl (letf (((symbol-function (quote org-test-verbatim)) (function* (lamb (letf* (((symbol-function (quote org-test-verbatim)) (function* (lam (flet ((org-test-verbatim (obj contents info) (org-element-verbatim- (org-test-with-backend "test" (forward-line 3) (should (equal (org-e (prog1 (org-test-with-backend "test" (forward-line 3) (should (equal (progn (org-mode) (progn (insert "\n* Head1\n** Head2\ntext\n*** Hea (unwind-protect (progn (org-mode) (progn (insert "\n* Head1\n** Head (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (with-current-buffer temp-buffer (unwind-protect (progn (org-mode) ( (let ((temp-buffer (generate-new-buffer " *temp*"))) (with-current-b (with-temp-buffer (org-mode) (progn (insert "\n* Head1\n** Head2\nte (org-test-with-temp-text "\n* Head1\n** Head2\ntext\n*** Head3" (org (lambda nil (org-test-with-temp-text "\n* Head1\n** Head2\ntext\n*** byte-code("\306\307!▒q\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▒r\310\311!q\210\312 d\313\223)L\210\314\216 ert-run-test([cl-struct-ert-test test-org-export/export-scope "Test 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/" "-L" "contrib/lisp" "-- command-line() normal-top-level() Test test-org-export/export-scope condition: (ert-test-failed ((should (equal (org-export-as ...) "text\n")) :form (equal "* Head1\n** Head2\ntext\n*** Head3\n" "text\n") :value nil :explanation (arrays-of-different-length 32 5 "* Head1\n** Head2\ntext\n*** Head3\n" "text\n" first-mismatch-at 0))) FAILED 95/130 test-org-export/export-scope --8<---------------cut here---------------end--------------->8--- Achim. -- +<[Q+ Matrix-12 WAVE#46+305 Neuron microQkb Andromeda XTk Blofeld]>+ Factory and User Sound Singles for Waldorf Q+, Q and microQ: http://Synth.Stromeko.net/Downloads.html#WaldorfSounds