diff options
| author | fukachan <fukachan> | 2002-09-15 00:11:42 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2002-09-15 00:11:42 +0000 |
| commit | 4523d35e5d720a61260acd3520d912e2a2e41e24 (patch) | |
| tree | 4562d419ee8bda9dc2de45f97e53c763d91a20b7 /fml/lib/FML/Process/Distribute.pm | |
| parent | ba2b04ae60a0e3e231202f932a3c4a1ddaab10b4 (diff) | |
| download | fml8-4523d35e5d720a61260acd3520d912e2a2e41e24.tar.gz fml8-4523d35e5d720a61260acd3520d912e2a2e41e24.tar.bz2 fml8-4523d35e5d720a61260acd3520d912e2a2e41e24.zip | |
switched to use of $curproc->mkdir() if could
Diffstat (limited to 'fml/lib/FML/Process/Distribute.pm')
| -rw-r--r-- | fml/lib/FML/Process/Distribute.pm | 11 |
1 files changed, 3 insertions, 8 deletions
diff --git a/fml/lib/FML/Process/Distribute.pm b/fml/lib/FML/Process/Distribute.pm index 83f38e0f..a4cb77b5 100644 --- a/fml/lib/FML/Process/Distribute.pm +++ b/fml/lib/FML/Process/Distribute.pm @@ -3,7 +3,7 @@ # Copyright (C) 2000,2001,2002 Ken'ichi Fukamachi # All rights reserved. # -# $FML: Distribute.pm,v 1.94 2002/09/02 03:31:43 fukachan Exp $ +# $FML: Distribute.pm,v 1.95 2002/09/11 23:18:14 fukachan Exp $ # package FML::Process::Distribute; @@ -514,13 +514,8 @@ sub htmlify }; unless ($@) { unless (-d $html_dir) { - eval q{ - use File::Path; - mkpath($html_dir, 0, 0755); - Log("mkdir $html_dir") if -d $html_dir; - LogError("fail to mkdir $html_dir") unless -d $html_dir; - }; - if ($@) { LogError($@);} + $curproc->mkdir($html_dir, "mode=public"); + LogError("fail to mkdir $html_dir") unless -d $html_dir; } eval q{ |