[O] make test - two unexpected failures

[Nick Dokos]

Just pulled and did make test - I get:

,----
| Ran 731 tests, 729 results as expected, 2 unexpected (2017-04-12 
14:30:29-0400)
| 7 expected failures
| 
| 2 unexpected results:
|    FAILED  test-org/custom-properties
|    FAILED  test-org/forward-paragraph
| 
| mk/targets.mk:103: recipe for target 'test' failed
| make: *** [test] Error 1
`----


and the two failing tests report:


,----
| Test test-org/custom-properties backtrace:
|   (if (unwind-protect (setq value-10992 (let ((org-custom-properties (
|   (let (form-description-10993) (if (unwind-protect (setq value-10992 
|   (let ((value-10992 (cl-gensym "ert-form-evaluation-aborted-"))) (let
|   (lambda nil (let ((value-10992 (cl-gensym "ert-form-evaluation-abort
|   ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
|   ert-run-test([cl-struct-ert-test test-org/custom-properties "Test cu
|   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/custom-properties condition:
|     (ert-test-failed
|      ((should
|        (let
|          (...)
|        (org-test-with-temp-text "* H
| :PROPERTIES:
| <point>:FOO: val
| :END:
| " ... ...)))
|       :form
|       (let
|         ((org-custom-properties ...))
|       (org-test-with-temp-text "* H
| :PROPERTIES:
| <point>:FOO: val
| :END:
| "
|         (org-toggle-custom-properties-visibility)
|         (org-invisible-p2)))
|       :value nil))
|    FAILED  646/731  test-org/custom-properties
`----

,----
| Test test-org/forward-paragraph backtrace:
|   (if (unwind-protect (setq value-11183 (let ((inside-text (if (string
|   (let (form-description-11184) (if (unwind-protect (setq value-11183 
|   (let ((value-11183 (cl-gensym "ert-form-evaluation-aborted-"))) (let
|   (lambda nil (let ((value-11175 (cl-gensym "ert-form-evaluation-abort
|   ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
|   ert-run-test([cl-struct-ert-test test-org/forward-paragraph "Test `o
|   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/forward-paragraph condition:
|     (ert-test-failed
|      ((should
|        (org-test-with-temp-text "#+BEGIN_CENTER
| P1
| 
| P2
| #+END_CENTER
| P3"
|        (org-hide-block-toggle)
|        (org-forward-paragraph)
|        (looking-at "P3")))
|       :form
|       (let
|         ((inside-text ...)
|          (org-mode-hook nil))
|       (with-temp-buffer
|         (org-mode)
|         (let ... ...)
|         (org-hide-block-toggle)
|         (org-forward-paragraph)
|         (looking-at "P3")))
|       :value nil))
|    FAILED  667/731  test-org/forward-paragraph
`----
   
-- 
Nick