From fcce098f8dc7046d378ab697e7b5ebda60bea627 Mon Sep 17 00:00:00 2001 From: fukachan Date: Tue, 29 Oct 2002 09:06:52 +0000 Subject: fix escape of Log(...) in eval q{} --- fml/lib/FML/Process/Utils.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/fml/lib/FML/Process/Utils.pm b/fml/lib/FML/Process/Utils.pm index 3a7bfa8c..bd1023ec 100644 --- a/fml/lib/FML/Process/Utils.pm +++ b/fml/lib/FML/Process/Utils.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: Utils.pm,v 1.45 2002/09/22 15:01:22 fukachan Exp $ +# $FML: Utils.pm,v 1.46 2002/10/05 15:44:39 fukachan Exp $ # package FML::Process::Utils; @@ -280,7 +280,7 @@ sub _mkpath_str use File::Path; mkpath([ \$dir ], 0, $mode); chmod $mode, \$dir; - Log(\"mkdirhier $dir mode=$mode\"); + Log(\"mkdirhier \$dir mode=$mode\"); }; LogError($@) if $@; } -- cgit v1.2.1