summaryrefslogtreecommitdiff
path: root/fml/lib/FML/Process
diff options
context:
space:
mode:
authorfukachan <fukachan>2006-04-17 13:36:23 +0000
committerfukachan <fukachan>2006-04-17 13:36:23 +0000
commit5dc8c8634fd66e8d217b7859ce61661222c54dd7 (patch)
tree28d16ec88cb3634aa7bb85af94f9d9574233201f /fml/lib/FML/Process
parentca31e4cb421834616d9b977e3cb500189c5119c6 (diff)
downloadfml8-5dc8c8634fd66e8d217b7859ce61661222c54dd7.tar.gz
fml8-5dc8c8634fd66e8d217b7859ce61661222c54dd7.tar.bz2
fml8-5dc8c8634fd66e8d217b7859ce61661222c54dd7.zip
define logdebug()
Diffstat (limited to 'fml/lib/FML/Process')
-rw-r--r--fml/lib/FML/Process/Debug.pm15
1 files changed, 14 insertions, 1 deletions
diff --git a/fml/lib/FML/Process/Debug.pm b/fml/lib/FML/Process/Debug.pm
index b40dd283..4cb6e771 100644
--- a/fml/lib/FML/Process/Debug.pm
+++ b/fml/lib/FML/Process/Debug.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: Debug.pm,v 1.9 2004/04/27 12:54:50 fukachan Exp $
+# $FML: Debug.pm,v 1.10 2004/07/11 15:43:39 fukachan Exp $
#
package FML::Process::Debug;
@@ -89,6 +89,8 @@ simplified version of FML::Process::* only used for debug.
=head2 logerror
+=head2 logdebug
+
=cut
@@ -138,6 +140,17 @@ sub logerror
}
+# Descriptions: log message at level as debug.
+# Arguments: OBJ($self) STR($msg) HASH_REF($msg_args)
+# Side Effects: none
+# Return Value: none
+sub logdebug
+{
+ my ($self, $msg, $msg_args) = @_;
+ print STDERR "debug: $msg\n";
+}
+
+
=head2 ml_home_prefix($domain)
search ml_home_prefi in /etc/fml/ml_home_prefix