diff options
| author | fukachan <fukachan> | 2002-04-20 05:40:02 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2002-04-20 05:40:02 +0000 |
| commit | a1d696e71edec8bfdbd43a6d753d3c79e4ac7e7e (patch) | |
| tree | 7e3b470d56396bd3b9d0b4493e235b79ede10c3b /fml/lib/FML/Process | |
| parent | 2e7d372322f6d769dbc9cb8bc2ba9fd18b470d36 (diff) | |
| download | fml8-a1d696e71edec8bfdbd43a6d753d3c79e4ac7e7e.tar.gz fml8-a1d696e71edec8bfdbd43a6d753d3c79e4ac7e7e.tar.bz2 fml8-a1d696e71edec8bfdbd43a6d753d3c79e4ac7e7e.zip | |
log raw error message
Diffstat (limited to 'fml/lib/FML/Process')
| -rw-r--r-- | fml/lib/FML/Process/Configure.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/fml/lib/FML/Process/Configure.pm b/fml/lib/FML/Process/Configure.pm index 24b885e6..f4811bc4 100644 --- a/fml/lib/FML/Process/Configure.pm +++ b/fml/lib/FML/Process/Configure.pm @@ -3,7 +3,7 @@ # Copyright (C) 2001,2002 Ken'ichi Fukamachi # All rights reserved. # -# $FML: Configure.pm,v 1.37 2002/02/17 13:45:10 fukachan Exp $ +# $FML: Configure.pm,v 1.38 2002/04/10 04:24:15 fukachan Exp $ # package FML::Process::Configure; @@ -241,8 +241,10 @@ sub _makefml ; # not show anything } else { + my $r = $@; LogError("command $method fail"); - if ($@ =~ /^(.*)\s+at\s+/) { + LogError($r); + if ($r =~ /^(.*)\s+at\s+/) { my $reason = $1; Log($reason); # pick up reason croak($reason); |