From 3bc41454474a3c414888d751464f7bffd18fd9aa Mon Sep 17 00:00:00 2001
From: Eric Wong <e@80x24.org>
Date: Thu, 15 Dec 2022 20:52:46 +0000
Subject: rproxy: link to mwrap_httpd /$PID/ root without each, too

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);
-- 
cgit v1.2.3-24-ge0c7