diff options
| author | fukachan <fukachan> | 2002-05-13 14:24:46 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2002-05-13 14:24:46 +0000 |
| commit | 5c9c265e0dfd1d535e5edbeffcb9cb3884d3998d (patch) | |
| tree | 811dc483a9432e5837fb721a11596ae35703bcc9 /fml/lib/FML/Command/HTMLify.pm | |
| parent | e0c6c7bff4390bbbe32f5727ac2f38dbbbde140b (diff) | |
| download | fml8-5c9c265e0dfd1d535e5edbeffcb9cb3884d3998d.tar.gz fml8-5c9c265e0dfd1d535e5edbeffcb9cb3884d3998d.tar.bz2 fml8-5c9c265e0dfd1d535e5edbeffcb9cb3884d3998d.zip | |
validate if config.cf exists
Diffstat (limited to 'fml/lib/FML/Command/HTMLify.pm')
| -rw-r--r-- | fml/lib/FML/Command/HTMLify.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/fml/lib/FML/Command/HTMLify.pm b/fml/lib/FML/Command/HTMLify.pm index 93ac99f4..d8703dfe 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.3 2002/04/22 04:02:01 fukachan Exp $ +# $FML: HTMLify.pm,v 1.4 2002/04/27 05:25:01 fukachan Exp $ # package FML::Command::HTMLify; @@ -44,6 +44,10 @@ sub convert croak("no such source directory"); } + unless ($curproc->is_config_cf_exist()) { + croak("invalid ML"); + } + my ($is_subdir_exists, $subdirs) = _check_subdir_exists($src_dir); if ($is_subdir_exists) { Log("looks subdir exists");} |