richter 2004/04/01 22:51:34
Modified: Embperl Object.pm
Log:
logging
Revision Changes Path
1.8 +2 -1 embperl/Embperl/Object.pm
Index: Object.pm
===================================================================
RCS file: /home/cvs/embperl/Embperl/Object.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -r1.7 -r1.8
--- Object.pm 2 Apr 2004 05:10:41 -0000 1.7
+++ Object.pm 2 Apr 2004 06:51:34 -0000 1.8
@@ -322,6 +322,7 @@
foreach my $path (@$reqpath)
{
my $testfn = "$path/$file" ;
+ print Embperl::LOG "[$$]Embperl::Object Search for request file
$file in $path\n" if ($debug);
if (-f $testfn)
{
$filename = $testfn ;
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
