From c72845fc89083628401acfda41ffc9b8b676657d Mon Sep 17 00:00:00 2001 From: fukachan Date: Sun, 17 Feb 2002 13:45:10 +0000 Subject: bug fix definitions on hooks --- fml/lib/FML/Process/HTMLify.pm | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) (limited to 'fml/lib/FML/Process/HTMLify.pm') diff --git a/fml/lib/FML/Process/HTMLify.pm b/fml/lib/FML/Process/HTMLify.pm index bba50378..5ad81241 100644 --- a/fml/lib/FML/Process/HTMLify.pm +++ b/fml/lib/FML/Process/HTMLify.pm @@ -3,7 +3,7 @@ # Copyright (C) 2000-2001,2002 Ken'ichi Fukamachi # All rights reserved. # -# $FML: HTMLify.pm,v 1.9 2002/02/02 08:04:53 fukachan Exp $ +# $FML: HTMLify.pm,v 1.10 2002/02/17 03:07:56 fukachan Exp $ # package FML::Process::HTMLify; @@ -65,6 +65,9 @@ sub new # Return Value: none sub prepare { + my ($curproc, $args) = @_; + my $config = $curproc->{ config }; + my $eval = $config->get_hook( 'fmlhtmlify_prepare_start_hook' ); if ($eval) { eval qq{ $eval; }; LogWarn($@) if $@; } @@ -79,6 +82,9 @@ sub prepare # Return Value: none sub verify_request { + my ($curproc, $args) = @_; + my $config = $curproc->{ config }; + my $eval = $config->get_hook( 'fmlhtmlify_verify_request_start_hook' ); if ($eval) { eval qq{ $eval; }; LogWarn($@) if $@; } @@ -100,6 +106,7 @@ call the actual thread tracking system. sub run { my ($curproc, $args) = @_; + my $config = $curproc->{ config }; my $argv = $curproc->command_line_argv(); my $options = $curproc->command_line_options(); my $src_dir = $argv->[0]; @@ -171,6 +178,7 @@ _EOF_ sub finish { my ($curproc, $args) = @_; + my $config = $curproc->{ config }; my $eval = $config->get_hook( 'fmlhtmlify_finish_start_hook' ); if ($eval) { eval qq{ $eval; }; LogWarn($@) if $@; } -- cgit v1.2.1