X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FWWW.pm;h=2acb4c83b0175ad1d2f7550bda4058673a600366;hb=c3509baca0b103a0c9d034de06f3ddc5fc9426fd;hp=fd09280390f831067b5cec748e47dd704214823d;hpb=3111c278a1ca996a69398896945cd29a3277cdb7;p=public-inbox.git

diff --git a/lib/PublicInbox/WWW.pm b/lib/PublicInbox/WWW.pm
index fd092803..2acb4c83 100644
--- a/lib/PublicInbox/WWW.pm
+++ b/lib/PublicInbox/WWW.pm
@@ -13,6 +13,7 @@ package PublicInbox::WWW;
 use 5.008;
 use strict;
 use warnings;
+use Plack::Request;
 use PublicInbox::Config qw(try_cat);
 use URI::Escape qw(uri_escape_utf8 uri_unescape);
 use constant SSOMA_URL => '//ssoma.public-inbox.org/';
@@ -94,12 +95,11 @@ sub preload {
 	require Digest::SHA;
 	require POSIX;
 
-	eval {
-		require PublicInbox::Search;
-		require PublicInbox::SearchView;
-		require PublicInbox::Mbox;
-		require IO::Compress::Gzip;
-	};
+	foreach (qw(PublicInbox::Search PublicInbox::SearchView
+			PublicInbox::Mbox IO::Compress::Gzip
+			PublicInbox::NewsWWW PublicInbox::NewsGroup)) {
+		eval "require $_;";
+	}
 }
 
 # private functions below
@@ -245,7 +245,7 @@ sub get_thread {
 sub ctx_get {
 	my ($ctx, $key) = @_;
 	my $val = $ctx->{$key};
-	(defined $val && $val ne '') or die "BUG: bad ctx, $key unusable\n";
+	(defined $val && $val ne '') or die "BUG: bad ctx, $key unusable";
 	$val;
 }