From 4523d35e5d720a61260acd3520d912e2a2e41e24 Mon Sep 17 00:00:00 2001
From: fukachan <fukachan>
Date: Sun, 15 Sep 2002 00:11:42 +0000
Subject: switched to use of $curproc->mkdir() if could

---
 fml/lib/FML/Command/HTMLify.pm | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

(limited to 'fml/lib/FML/Command/HTMLify.pm')

diff --git a/fml/lib/FML/Command/HTMLify.pm b/fml/lib/FML/Command/HTMLify.pm
index adf8909a..684456a2 100644
--- a/fml/lib/FML/Command/HTMLify.pm
+++ b/fml/lib/FML/Command/HTMLify.pm
@@ -4,7 +4,7 @@
 #   All rights reserved. This program is free software; you can
 #   redistribute it and/or modify it under the same terms as Perl itself.
 #
-# $FML: HTMLify.pm,v 1.7 2002/06/30 01:22:26 fukachan Exp $
+# $FML: HTMLify.pm,v 1.8 2002/09/11 23:18:05 fukachan Exp $
 #
 
 package FML::Command::HTMLify;
@@ -55,8 +55,7 @@ sub convert
 
     if (defined $dst_dir) {
         unless (-d $dst_dir) {
-            use File::Utils qw(mkdirhier);
-            mkdirhier($dst_dir, 0755);
+            $curproc->mkdir($dst_dir, "mode=public");
         }
 
 	if ($is_subdir_exists) {
-- 
cgit v1.2.1