[O] test suite failure

[Nick Dokos]

Just a heads-up: I just pulled, regenerated autoloads 
(release_7.8.11-107-ga69f4b8),
and ran ``make check''. I got 

,----
| ...
| Ran 193 tests, 192 results as expected, 1 unexpected (2012-07-03 
10:57:01-0400)
| 6 expected failures
| 
| 1 unexpected results:
|    FAILED  test-ob-lob/call-with-header-arguments
`----

The details of the failure (I haven't spent any time on it):

,----
| "testing"
| Test test-ob-lob/call-with-header-arguments backtrace:
|   replace-match(nil nil nil nil 3)
|   (save-excursion (goto-char (match-beginning 3)) (replace-match hash 
|   org-babel-set-current-result-hash(nil)
|   (prog1 (org-babel-execute-src-block nil (mkinfo (org-babel-process-p
|   (if (and cache\? (equal new-hash old-hash)) (save-excursion (goto-ch
|   (let* ((pre-params (org-babel-merge-params org-babel-default-header-
|   (progn (fset (quote mkinfo) (function* (lambda (p) (block mkinfo (li
|   (unwind-protect (progn (fset (quote mkinfo) (function* (lambda (p) (
|   (let* ((--cl-letf-bound-- (fboundp (quote mkinfo))) (--cl-letf-save-
|   (letf (((symbol-function (quote mkinfo)) (function* (lambda (p) (blo
|   (letf* (((symbol-function (quote mkinfo)) (function* (lambda (p) (bl
|   (flet ((mkinfo (p) (list "emacs-lisp" "results" p nil nil (nth 2 inf
|   org-babel-lob-execute(("echo(input=\"testing\")" nil 0))
|   (list "testing" (org-babel-lob-execute (org-babel-lob-get-info)))
|   (let ((fn-1188 (function string=)) (args-1189 (list "testing" (org-b
|   (should (string= "testing" (org-babel-lob-execute (org-babel-lob-get
|   (save-restriction (move-beginning-of-line 1) (forward-line 6) (messa
|   (progn (org-id-goto "fab7e291-fde6-45fc-bf6e-a485b8bca2f0") (setq to
|   (unwind-protect (progn (org-id-goto "fab7e291-fde6-45fc-bf6e-a485b8b
|   (let ((save-match-data-internal (match-data))) (unwind-protect (prog
|   (save-match-data (org-id-goto "fab7e291-fde6-45fc-bf6e-a485b8bca2f0"
|   (progn (save-match-data (org-id-goto "fab7e291-fde6-45fc-bf6e-a485b8
|   (unwind-protect (progn (save-match-data (org-id-goto "fab7e291-fde6-
|   (let ((wconfig (current-window-configuration))) (unwind-protect (pro
|   (save-window-excursion (save-match-data (org-id-goto "fab7e291-fde6-
|   (let* ((id-location (org-id-find "fab7e291-fde6-45fc-bf6e-a485b8bca2
|   (org-test-at-id "fab7e291-fde6-45fc-bf6e-a485b8bca2f0" (move-beginni
|   (lambda nil (org-test-at-id "fab7e291-fde6-45fc-bf6e-a485b8bca2f0" (
|   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!\211r\310\311!q\210\312 d\313\223)L\210\314\216
|   ert-run-test([cl-struct-ert-test test-ob-lob/call-with-header-argume
|   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(("--eval" "(add-to-list 'load-path \"./lisp\")" "--ev
|   command-line()
|   normal-top-level()
| Test test-ob-lob/call-with-header-arguments condition:
|     (wrong-type-argument stringp nil)
|    FAILED   94/193  test-ob-lob/call-with-header-arguments
`----

HTH,
Nick