summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPaul Joseph Davis <davisp@apache.org>2009-05-30 23:58:53 +0000
committerPaul Joseph Davis <davisp@apache.org>2009-05-30 23:58:53 +0000
commit2b21b31c73dfc500762360253b6e390024c7cf28 (patch)
tree65cc4cbeb1f09eb865a01ec625915981c69b7a5e
parent5fb494f586628b5903a07f7165636b8acdc2ced4 (diff)
Adding code:add_pathz/1 calls for older Erlang versions.
git-svn-id: https://svn.apache.org/repos/asf/couchdb/trunk@780348 13f79535-47bb-0310-9956-ffa450edef68
-rwxr-xr-xtest/etap/001-load.t1
-rwxr-xr-xtest/etap/010-file-basics.t1
-rwxr-xr-xtest/etap/011-file-headers.t1
-rwxr-xr-xtest/etap/020-btree-basics.t1
-rwxr-xr-xtest/etap/021-btree-reductions.t1
-rwxr-xr-xtest/etap/030-doc-from-json.t1
-rwxr-xr-xtest/etap/031-doc-to-json.t5
7 files changed, 7 insertions, 4 deletions
diff --git a/test/etap/001-load.t b/test/etap/001-load.t
index 527ba8f6..ef941867 100755
--- a/test/etap/001-load.t
+++ b/test/etap/001-load.t
@@ -5,6 +5,7 @@
% Test that we can load each module.
main(_) ->
+ code:add_pathz("src/couchdb"),
etap:plan(39),
Modules = [
couch_batch_save,
diff --git a/test/etap/010-file-basics.t b/test/etap/010-file-basics.t
index af9601d8..62704a1b 100755
--- a/test/etap/010-file-basics.t
+++ b/test/etap/010-file-basics.t
@@ -5,6 +5,7 @@
-define(FILE_NAME, "./test/etap/temp.010").
main(_) ->
+ code:add_pathz("src/couchdb"),
etap:plan(16),
case (catch test()) of
ok ->
diff --git a/test/etap/011-file-headers.t b/test/etap/011-file-headers.t
index 51e7fa70..f9d0c948 100755
--- a/test/etap/011-file-headers.t
+++ b/test/etap/011-file-headers.t
@@ -6,6 +6,7 @@
-define(SIZE_BLOCK, 4096). % Need to keep this in sync with couch_file.erl
main(_) ->
+ code:add_pathz("src/couchdb"),
{S1, S2, S3} = now(),
random:seed(S1, S2, S3),
diff --git a/test/etap/020-btree-basics.t b/test/etap/020-btree-basics.t
index 682fd229..2cc5723d 100755
--- a/test/etap/020-btree-basics.t
+++ b/test/etap/020-btree-basics.t
@@ -8,6 +8,7 @@
-record(btree, {fd, root, extract_kv, assemble_kv, less, reduce}).
main(_) ->
+ code:add_pathz("src/couchdb"),
etap:plan(48),
case (catch test()) of
ok ->
diff --git a/test/etap/021-btree-reductions.t b/test/etap/021-btree-reductions.t
index 04c175e9..eb84f09b 100755
--- a/test/etap/021-btree-reductions.t
+++ b/test/etap/021-btree-reductions.t
@@ -6,6 +6,7 @@
-define(ROWS, 1000).
main(_) ->
+ code:add_pathz("src/couchdb"),
etap:plan(8),
case (catch test()) of
ok ->
diff --git a/test/etap/030-doc-from-json.t b/test/etap/030-doc-from-json.t
index 2d5eb8f7..13d11442 100755
--- a/test/etap/030-doc-from-json.t
+++ b/test/etap/030-doc-from-json.t
@@ -8,6 +8,7 @@
attachments=[], deleted=false, meta=[]}).
main(_) ->
+ code:add_pathz("src/couchdb"),
etap:plan(26),
case (catch test()) of
ok ->
diff --git a/test/etap/031-doc-to-json.t b/test/etap/031-doc-to-json.t
index f444ec6e..02a09616 100755
--- a/test/etap/031-doc-to-json.t
+++ b/test/etap/031-doc-to-json.t
@@ -8,6 +8,7 @@
attachments=[], deleted=false, meta=[]}).
main(_) ->
+ code:add_pathz("src/couchdb"),
etap:plan(unknown),
case (catch test()) of
ok ->
@@ -20,7 +21,6 @@ main(_) ->
test() ->
ok = test_to_json_success(),
- ok = test_to_json_errors(),
ok.
test_to_json_success() ->
@@ -150,6 +150,3 @@ test_to_json_success() ->
etap:is(couch_doc:to_json_obj(Doc, Options), EJson, Mesg)
end, Cases),
ok.
-
-test_to_json_errors() ->
- ok. \ No newline at end of file