--- branches/hidra/WebPac.pm	2006/05/24 13:33:33	734
+++ branches/hidra/WebPac.pm	2006/05/24 13:35:42	736
@@ -63,7 +63,7 @@
 
 	return $tpl if (! $base_path);
 
-	warn "base_path: $base_path, p: $p, path: $path, tpl: $tpl\n";
+	#warn "base_path: $base_path, p: $p, path: $path, tpl: $tpl\n";
 
 	$p =~ s#/[^/]*$##;