summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorfukachan <fukachan>2003-03-16 10:47:22 +0000
committerfukachan <fukachan>2003-03-16 10:47:22 +0000
commit0231009257a24e5bfce9b2f57995cb6b2b27e171 (patch)
treef745fd6a8cecf5c1c4ccb76e1747e0b625e7a32a
parent5f34d19de1cd77c0db25d7ec2d1e6dfdc6de5cfe (diff)
downloadfml8-0231009257a24e5bfce9b2f57995cb6b2b27e171.tar.gz
fml8-0231009257a24e5bfce9b2f57995cb6b2b27e171.tar.bz2
fml8-0231009257a24e5bfce9b2f57995cb6b2b27e171.zip
add comment on lock channel
-rw-r--r--fml/lib/FML/Command.pm3
-rw-r--r--fml/lib/FML/Process/Distribute.pm4
2 files changed, 4 insertions, 3 deletions
diff --git a/fml/lib/FML/Command.pm b/fml/lib/FML/Command.pm
index ab60b959..c9bad1b4 100644
--- a/fml/lib/FML/Command.pm
+++ b/fml/lib/FML/Command.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: Command.pm,v 1.35 2002/12/24 10:19:41 fukachan Exp $
+# $FML: Command.pm,v 1.36 2003/01/03 07:03:35 fukachan Exp $
#
# XXX
@@ -210,6 +210,7 @@ sub AUTOLOAD
# run the actual process
if ($command->can('process')) {
+ # XXX_LOCK_CHANNEL: default
$curproc->lock() if $need_lock;
$command->process($curproc, $command_args);
$curproc->unlock() if $need_lock;
diff --git a/fml/lib/FML/Process/Distribute.pm b/fml/lib/FML/Process/Distribute.pm
index a48f272f..cb306852 100644
--- a/fml/lib/FML/Process/Distribute.pm
+++ b/fml/lib/FML/Process/Distribute.pm
@@ -3,7 +3,7 @@
# Copyright (C) 2000,2001,2002,2003 Ken'ichi Fukamachi
# All rights reserved.
#
-# $FML: Distribute.pm,v 1.108 2003/03/06 04:16:00 fukachan Exp $
+# $FML: Distribute.pm,v 1.109 2003/03/06 13:37:34 fukachan Exp $
#
package FML::Process::Distribute;
@@ -201,7 +201,7 @@ sub run
my $eval = $config->get_hook( 'distribute_run_start_hook' );
if ($eval) { eval qq{ $eval; }; LogWarn($@) if $@; }
- $curproc->lock();
+ $curproc->lock(); # XXX_LOCK_CHANNEL: default
unless ($curproc->is_refused()) {
if ($curproc->permit_post($args)) {
$curproc->_distribute($args);