bug fix definitions on hooks

1 files changed, 9 insertions, 1 deletions

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 $@; }