Browse Source

more robust test execution with `org-test-run-all-tests'

* testing/org-test.el (org-test-touch-all-examples): Open all example
  files -- seems to help resolution of org ids.
  (org-test-run-all-tests): Open all example files before running
  tests.
Eric Schulte 13 years ago
parent
commit
63faebd64b
1 changed files with 7 additions and 0 deletions
  1. 7 0
      testing/org-test.el

+ 7 - 0
testing/org-test.el

@@ -222,10 +222,17 @@ files."
 		(file-name-nondirectory (buffer-file-name)))
 	       "/")))
 
+(defun org-test-touch-all-examples ()
+  (dolist (file (directory-files
+		 org-test-example-dir 'full
+		 "^\\([^.]\\|\\.\\([^.]\\|\\..\\)\\).*\\.org$"))
+    (find-file file)))
+
 (defun org-test-run-all-tests ()
   "Run all defined tests matching \"\\(org\\|ob\\)\".
 Load all test files first."
   (interactive)
+  (org-test-touch-all-examples)
   (org-test-load)
   (ert "\\(org\\|ob\\)"))