diff options
author | Artur Malabarba <bruce.connor.am@gmail.com> | 2014-11-03 01:50:44 +0000 |
---|---|---|
committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2014-11-03 01:50:44 +0000 |
commit | 2afa91649868e865cd573c149f255acb8379c82f (patch) | |
tree | 6a9bb5be967156f942c3404464b5c6eabb40a75b | |
parent | 5fe164f7341b753366d6d25100f9dba8b6626e55 (diff) |
Fix sampler function
-rw-r--r-- | test/tests.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/test/tests.el b/test/tests.el index e097244..11914bb 100644 --- a/test/tests.el +++ b/test/tests.el @@ -6,9 +6,12 @@ (unintern symbol))))) ;;; Tests +(defvar stack-test-data-dir + (expand-file-name "data-samples/") + "") (defun stack-test-sample-data (method &optional directory) - (let ((file (concat "data-samples/" + (let ((file (concat stack-test-data-dir (when directory (concat directory "/")) method ".el"))) (when (file-exists-p file) |