From d571cc0e1cb54a73d8eeb0a8761c32361e476d16 Mon Sep 17 00:00:00 2001
From: lace <>
Date: Thu, 29 Dec 2005 06:06:37 +0000
Subject: [PATCH] +$W->{"project::Lib-init-hook"} just as ...
 post-My::Web-initialization hook.

---
 project/Lib.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/project/Lib.pm b/project/Lib.pm
index 6ccc6e3..8586c6c 100644
--- a/project/Lib.pm
+++ b/project/Lib.pm
@@ -196,6 +196,7 @@ my($class,%args)=@_;
 			%args,
 			"heading_novskip"=>1,
 			);
+	do { &{$_}() if $_; } for $W->{__PACKAGE__."-init-hook"};
 	$class->heading();
 	print $class->platforms($ListItem->{"platform"});
 	$class->print_project($ListItem,%args);
-- 
1.8.3.1