When compiling Org with
make up2
a failed test prevents successful completion:
FAILED 555/746 test-org-publish/resolve-external-link
I am running GNU Emacs 25.3.1 (x86_64-apple-darwin16.7.0, Carbon
Version 157 AppKit 1504.83) of 2017-09-12 with Org mode version 9.1.1
(release_9.1.1-54-gff6b38. I am working in MacOS 10.12.6, with bash
4.4.12.
Output from the failed test is:
Publishing file /Users/Shared/git/org-mode/testing/examples/pub/b.org
using ‘(closure ((backend . [cl-struct-org-export-backend nil nil
((headline lambda (h c i) (concat (org-export-get-reference h i) c))
(paragraph lambda (p c i) c) (section lambda (s c i) c) (link lambda
(l c i) (let ((option (org-element-property :search-option l)) (path
(org-element-property :path l))) (and option
(org-publish-resolve-external-link option path))))) nil nil nil nil])
(ids) t) (plist filename pub-dir) (org-publish-org-to backend filename
.test plist pub-dir))’
Publishing file /Users/Shared/git/org-mode/testing/examples/pub/a.org
using ‘(closure ((backend . [cl-struct-org-export-backend nil nil
((headline lambda (h c i) (concat (org-export-get-reference h i) c))
(paragraph lambda (p c i) c) (section lambda (s c i) c) (link lambda
(l c i) (let ((option (org-element-property :search-option l)) (path
(org-element-property :path l))) (and option
(org-publish-resolve-external-link option path))))) nil nil nil nil])
(ids) t) (plist filename pub-dir) (org-publish-org-to backend filename
.test plist pub-dir))’
Publishing file /Users/Shared/git/org-mode/testing/examples/pub/b.org
using ‘(closure ((backend . [cl-struct-org-export-backend nil nil
((headline lambda (h c i) c) (paragraph lambda (p c i) c) (section
lambda (s c i) c) (link lambda (l c i) (let ((option
(org-element-property :search-option l)) (path (org-element-property
:path l))) (when option (throw :exit
(org-publish-resolve-external-link option path t)))))) nil nil nil
nil]) (ids) t) (plist filename pub-dir) (setq ids (cons (catch :exit
(org-publish-org-to backend filename .test plist pub-dir)) ids)))’
Publishing file /Users/Shared/git/org-mode/testing/examples/pub/a.org
using ‘(closure ((backend . [cl-struct-org-export-backend nil nil
((headline lambda (h c i) c) (paragraph lambda (p c i) c) (section
lambda (s c i) c) (link lambda (l c i) (let ((option
(org-element-property :search-option l)) (path (org-element-property
:path l))) (when option (throw :exit
(org-publish-resolve-external-link option path t)))))) nil nil nil
nil]) (ids a1) t) (plist filename pub-dir) (setq ids (cons (catch
:exit (org-publish-org-to backend filename .test plist pub-dir))
ids)))’
Test test-org-publish/resolve-external-link backtrace:
(if (unwind-protect (setq value-14360 (apply fn-14358 args-14359)) (
(let (form-description-14362) (if (unwind-protect (setq value-14360
(let ((value-14360 (quote ert-form-evaluation-aborted-14361))) (let
(let ((fn-14358 (function equal)) (args-14359 (list "a1" (let* ((ids
(closure (t) nil (let ((fn-14353 (function apply)) (args-14354 (list
ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
ert-run-test([cl-struct-ert-test test-org-publish/resolve-external-l
ert-run-or-rerun-test([cl-struct-ert--stats "\\(org\\|ob\\)" [[cl-st
ert-run-tests("\\(org\\|ob\\)" #[385 "\306\307\"\203G\211\211G\310
ert-run-tests-batch("\\(org\\|ob\\)")
ert-run-tests-batch-and-exit("\\(org\\|ob\\)")
(let ((org-id-track-globally t) (org-test-selector (if org-test-sele
org-test-run-batch-tests("\\(org\\|ob\\)")
eval((org-test-run-batch-tests org-test-select-re))
command-line-1(("--eval" "(setq vc-handled-backends nil org-startup-
command-line()
normal-top-level()
Test test-org-publish/resolve-external-link condition:
(ert-test-failed
((should
(equal "a1"
(let* ... ... ...)))
:form
(equal "a1" "orgbb5a65b")
:value nil :explanation
(arrays-of-different-length 2 10 "a1" "orgbb5a65b" first-mismatch-at 0)))
FAILED 555/746 test-org-publish/resolve-external-link
