Changeset e59d775 for t

Timestamp:

Jul 16, 2011, 12:28:10 AM (12 years ago)

Author:

David Benjamin <davidben@mit.edu>

Branches:

master, release-1.10, release-1.8, release-1.9

Children:

396505be

Parents:

055e366

git-author:

David Benjamin <davidben@mit.edu> (07/09/11 22:38:58)

git-committer:

David Benjamin <davidben@mit.edu> (07/16/11 00:28:10)

Message:

Use the old-style mkpath invocation

Allows the unit tests to run on perl 5.8.

File:

• t/completion.t (modified) (1 diff)

t/completion.t

@@ -323 +323 @@
 }
 
-mkpath("$tmpdir/.owl/",
-       "$tmpdir/.owl/modules/",
-       "$tmpdir/Public/",
-       "$tmpdir/Private/",
-       "$tmpdir/.ours",
-       "$tmpdir/www",
-     {mode => 0700});
+mkpath(["$tmpdir/.owl/",
+        "$tmpdir/.owl/modules/",
+        "$tmpdir/Public/",
+        "$tmpdir/Private/",
+        "$tmpdir/.ours",
+        "$tmpdir/www"],
+       0, 0700);
 touch("$tmpdir/.zephyr.subs");
 touch("$tmpdir/wheee");