testing/lisp/test-ob-table.el

   1 ;;; test-ob-table.el
   2
   3 ;; Copyright (c) 2011-2012 Eric Schulte
   4 ;; Authors: Eric Schulte
   5
   6 ;; Released under the GNU General Public License version 3
   7 ;; see: http://www.gnu.org/licenses/gpl-3.0.html
   8
   9 ;;;; Comments:
  10
  11 ;; Template test file for Org-mode tests
  12
  13 \f
  14 ;;; Code:
  15 (let ((load-path (cons (expand-file-name
  16                         ".." (file-name-directory
  17                               (or load-file-name buffer-file-name)))
  18                        load-path)))
  19   (require 'org-test)
  20   (require 'org-test-ob-consts))
  21
  22 \f
  23 ;;; Tests
  24
  25 ;; TODO Test Broken (wrong-type-argument number-or-marker-p "2.0")
  26 ;; (ert-deftest test-ob-table/sbe ()
  27 ;;   "Test that `sbe' can be used to call code blocks from inside tables."
  28 ;;   (org-test-at-id "6d2ff4ce-4489-4e2a-9c65-e3f71f77d975"
  29 ;;     (should (= 2 (sbe take-sqrt (n "4"))))))
  30
  31 (provide 'test-ob-table)
  32
  33 ;;; test-ob-table.el ends here