From adefc3267af98da52b4eafd9df0ada36ea36803a Mon Sep 17 00:00:00 2001 From: fukachan Date: Sun, 18 Feb 2001 04:56:11 +0000 Subject: fix how to work when $argv[0] is not specified --- fml/lib/FML/Process/Switch.pm | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) (limited to 'fml/lib/FML/Process/Switch.pm') diff --git a/fml/lib/FML/Process/Switch.pm b/fml/lib/FML/Process/Switch.pm index eef95c85..6ec2bd6c 100644 --- a/fml/lib/FML/Process/Switch.pm +++ b/fml/lib/FML/Process/Switch.pm @@ -13,7 +13,7 @@ package FML::Process::Switch; use strict; use Carp; use vars qw($debug); - +use Standalone; sub main::Bootstrap2 { @@ -173,10 +173,7 @@ sub _ml_name_is_required { my ($myname) = @_; - if ($myname eq 'fmlconf') { - return 0; - } - elsif ($myname eq 'fmldoc') { + if ($myname eq 'fmldoc') { return 0; } else { -- cgit v1.2.1