mwrap (Perl version) user+dev discussion/patches/pulls/bugs/help
 help / color / mirror / code / Atom feed
* [PATCH v2] make Plack optional
@ 2022-12-16  9:44 Eric Wong
  0 siblings, 0 replies; only message in thread
From: Eric Wong @ 2022-12-16  9:44 UTC (permalink / raw)
  To: mwrap-perl

Let's not increase requirements for running this project, since
some users will be perfectly fine with curl and CSV output.

Furthermore, Plack::Middleware::Deflater is not included in
the main Plack distribution, so that requirement should be
further separated since it's not required.
---
 v2: combined with making Plack completely optional

 script/mwrap-rproxy | 7 +++----
 t/httpd.t           | 4 +++-
 2 files changed, 6 insertions(+), 5 deletions(-)

diff --git a/script/mwrap-rproxy b/script/mwrap-rproxy
index a5572c5..97cca8e 100644
--- a/script/mwrap-rproxy
+++ b/script/mwrap-rproxy
@@ -3,8 +3,8 @@
 # License: GPL-2.0+ <https://www.gnu.org/licenses/gpl-2.0.txt>
 # thin wrapper for Devel::Mwrap::Rproxy
 use v5.12; # strict
-use Devel::Mwrap::Rproxy;
-use Plack::Runner;
+eval { require Plack::Runner } or die "Plack not installed: $@\n";
+require Devel::Mwrap::Rproxy;
 use Getopt::Long qw(:config no_ignore_case no_auto_abbrev pass_through);
 my $usage = "$0 --socket-dir=/path/to/socket-dir [PLACKUP_OPTIONS]\n";
 my $socket_dir;
@@ -28,8 +28,7 @@ Inherited socket (fd=3) is non-blocking, making it blocking.
 		$runner->set_options(listen_sock => $s);
 	}
 }
-if ($gz) {
-	require Plack::Middleware::Deflater;
+if ($gz && eval { require Plack::Middleware::Deflater } and !$@) {
 	$app = Plack::Middleware::Deflater->wrap($app);
 }
 $runner->run($app);
diff --git a/t/httpd.t b/t/httpd.t
index ca90cf0..176c6ed 100644
--- a/t/httpd.t
+++ b/t/httpd.t
@@ -87,7 +87,9 @@ SKIP: {
 }
 
 SKIP: {
-	eval { require HTTP::Tiny } or skip 'HTTP::Tiny missing', 1;
+	for my $m (qw(Plack::Util HTTP::Tiny)) {
+		eval "require $m" or skip "$m missing", 1;
+	}
 	my $srv = IO::Socket::INET->new(LocalAddr => '127.0.0.1',
 				ReuseAddr => 1, Proto => 'tcp',
 				Type => SOCK_STREAM,

^ permalink raw reply related	[flat|nested] only message in thread

only message in thread, other threads:[~2022-12-16  9:43 UTC | newest]

Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2022-12-16  9:44 [PATCH v2] make Plack optional Eric Wong

Code repositories for project(s) associated with this public inbox

	https://80x24.org/mwrap-perl.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).