Changeset 8d8685d

Timestamp:

Jul 9, 2011, 10:38:58 PM (13 years ago)

Author:

David Benjamin <davidben@mit.edu>

Children:

4bf2a11

Parents:

4823b08

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");