Browse Source

testing/: Merge org-test-ob-consts.el into org-test.el

Bastien Guerry 5 years ago
parent
commit
9f17654913
2 changed files with 9 additions and 26 deletions
  1. 0 23
      testing/org-test-ob-consts.el
  2. 9 3
      testing/org-test.el

+ 0 - 23
testing/org-test-ob-consts.el

@@ -1,23 +0,0 @@
-;;; org-test-ob-consts.el --- constants for use in code block tests
-
-;; Copyright (c) 2010-2013 Eric Schulte
-;; Authors: Eric Schulte
-
-;; Released under the GNU General Public License version 3
-;; see: http://www.gnu.org/licenses/gpl-3.0.html
-
-;;;; Comments:
-
-;; Template test file for Org-mode tests
-
-
-;;; Code:
-(defconst org-test-file-ob-anchor
-  "94839181-184f-4ff4-a72f-94214df6f5ba")
-
-(defconst org-test-link-in-heading-file-ob-anchor
-  "a8b1d111-eca8-49f0-8930-56d4f0875155")
-
-(provide 'org-test-ob-consts)
-
-;;; org-test-ob-consts.el ends here

+ 9 - 3
testing/org-test.el

@@ -30,7 +30,14 @@
 
 
 ;;;; Code:
-(require 'org-test-ob-consts)
+
+;;; Ob constants
+
+(defconst org-test-file-ob-anchor
+  "94839181-184f-4ff4-a72f-94214df6f5ba")
+
+(defconst org-test-link-in-heading-file-ob-anchor
+  "a8b1d111-eca8-49f0-8930-56d4f0875155")
 
 (let* ((org-test-dir (expand-file-name
 		      (file-name-directory
@@ -304,8 +311,7 @@ Consider setting `pp-escape-newlines' to nil manually."
 	 "			\"..\" (file-name-directory\n"
 	 "			      (or load-file-name buffer-file-name)))\n"
 	 "		       load-path)))\n"
-	 "  (require 'org-test)\n"
-	 "  (require 'org-test-ob-consts))\n\n"
+	 "  (require 'org-test)\n\n"
 	 "\n"
 	 ";;; Tests\n"
 	 "(ert-deftest " name "/example-test ()\n"