diff options
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");} |