From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <e@80x24.org>
X-Spam-Checker-Version: SpamAssassin 3.4.2 (2018-09-13) on dcvr.yhbt.net
X-Spam-Level: 
X-Spam-ASN:  
X-Spam-Status: No, score=-4.1 required=3.0 tests=ALL_TRUSTED,AWL,BAYES_00,
	DKIM_SIGNED,DKIM_VALID,DKIM_VALID_AU,DKIM_VALID_EF shortcircuit=no
	autolearn=ham autolearn_force=no version=3.4.2
Received: from localhost (dcvr.yhbt.net [127.0.0.1])
	by dcvr.yhbt.net (Postfix) with ESMTP id F324C1FAF9
	for <mwrap-perl@80x24.org>; Thu, 15 Dec 2022 20:52:57 +0000 (UTC)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=80x24.org;
	s=selector1; t=1671137578;
	bh=O5BZHtKdAHFwlAE9/1/X0pDSSsDgMFFKhUHFtjUhg0A=;
	h=From:To:Subject:Date:In-Reply-To:References:From;
	b=jtZ0dA8R1lJcND+lq7A0j5kV06cLadNegWoI64Bp0bv0KYuYSvaSppYk4VQv5KH3f
	 jo/AQ1KKPJzXtf6881h3TXUmSg/tk0gW3MFZ3+gTunL9Ao6N0ROLkoTZBrqenW0KIZ
	 u5zp6SBK7tGmWiY8saYP0G/bnv6cxa7qI4aGWREg=
From: Eric Wong <e@80x24.org>
To: mwrap-perl@80x24.org
Subject: [PATCH 10/19] rproxy: link to mwrap_httpd /$PID/ root without each, too
Date: Thu, 15 Dec 2022 20:52:46 +0000
Message-Id: <20221215205255.27840-11-e@80x24.org>
In-Reply-To: <20221215205255.27840-1-e@80x24.org>
References: <20221215205255.27840-1-e@80x24.org>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
List-Id: <mwrap-perl.yhbt.net>

We'll keep each/2000 linked, but the /$PID/ root may provide a
better jumping point.
---
 lib/Devel/Mwrap/Rproxy.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/Devel/Mwrap/Rproxy.pm b/lib/Devel/Mwrap/Rproxy.pm
index 811b503..f7f8a82 100644
--- a/lib/Devel/Mwrap/Rproxy.pm
+++ b/lib/Devel/Mwrap/Rproxy.pm
@@ -46,8 +46,9 @@ sub list {
 	for (@pids) {
 		substr($_, -5, 5, ''); # chop off .sock
 		my $cmd = $valid_pid->($_) // next;
+		print $fh qq(<a\nhref="./$_/">$_</a>/);
 		$_ .= '/each/2000';
-		say $fh qq(<a\nhref="./), $_, '">', $_, "</a>\t", $cmd;
+		say $fh qq(<a\nhref="./), $_, qq(">each/2000</a>\t), $cmd;
 	}
 	print $fh '</pre></body></html>';
 	r(200, $str);