From 77e02b1530b176962a8d81a06677149738d099be Mon Sep 17 00:00:00 2001
From: Aaron Bieber <aaron@bolddaemon.com>
Date: Wed, 26 Jun 2024 08:33:55 -0600
Subject: [PATCH] fix cvs and github links to not include the flavor

- also add lsp stuff to the flake
---
 flake.nix      |  2 +-
 openbsd.app.pl | 12 ++++++++----
 2 files changed, 9 insertions(+), 5 deletions(-)

diff --git a/flake.nix b/flake.nix
index b605f50..5ac1e1e 100644
--- a/flake.nix
+++ b/flake.nix
@@ -43,7 +43,7 @@
               nix run github:qbit/xin#flake-warn
               echo "Perl `${pkgs.perl}/bin/perl --version`"
             '';
-            buildInputs = with pkgs.perlPackages; [ PerlTidy pkgs.sqlite ];
+            buildInputs = with pkgs.perlPackages; [ PerlTidy pkgs.sqlite PerlLanguageServer ];
             nativeBuildInputs = with pkgs.perlPackages; [
               perl
               Mojolicious
diff --git a/openbsd.app.pl b/openbsd.app.pl
index 9850253..c7c4859 100755
--- a/openbsd.app.pl
+++ b/openbsd.app.pl
@@ -404,6 +404,8 @@ __DATA__
                       title="Dependencies for <%= $info->{FULLPKGNAME} %>"
                     >Dep Tree</a>
                 </li>
+		% my $clean_name = $info->{FULLPKGPATH};
+		% $clean_name =~ s/^(.*),.*$/$1/;
                 <li>
                     <a href="/reverse?name=<%= $info->{FULLPKGPATH} %>"
                       title="Reverse dependencies for <%= $info->{FULLPKGNAME} %>"
@@ -411,13 +413,13 @@ __DATA__
                 </li>
                 <li>
                     <a
-                      href="https://cvsweb.openbsd.org/cgi-bin/cvsweb/ports/<%= $info->{FULLPKGPATH} %>"
+                      href="https://cvsweb.openbsd.org/cgi-bin/cvsweb/ports/<%= $clean_name %>"
                       title="CVSWeb page for <%= $info->{FULLPKGNAME} %>"
                     >CVS Web</a>
                 </li>
                 <li>
                     <a
-                      href="https://github.com/openbsd/ports/tree/master/<%= $info->{FULLPKGPATH} %>"
+                      href="https://github.com/openbsd/ports/tree/master/<%= $clean_name %>"
                       title="OpenBSD GitHub page for <%= $info->{FULLPKGNAME} %>"
                     >GitHub</a>
                 </li>
@@ -484,6 +486,8 @@ __DATA__
                       title="Dependencies for <%= $result->{FULLPKGNAME} %>"
                     >Dep Tree</a>
                 </li>
+		% my $clean_name = $result->{FULLPKGPATH};
+		% $clean_name =~ s/^(.*),.*$/$1/;
                 <li>
                     <a href="/reverse?name=<%= $result->{FULLPKGPATH} %>"
                       title="Reverse dependencies for <%= $result->{FULLPKGNAME} %>"
@@ -491,13 +495,13 @@ __DATA__
                 </li>
                 <li>
                     <a
-                      href="https://cvsweb.openbsd.org/cgi-bin/cvsweb/ports/<%= $result->{FULLPKGPATH} %>"
+                      href="https://cvsweb.openbsd.org/cgi-bin/cvsweb/ports/<%= $clean_name %>"
                       title="CVSWeb page for <%= $result->{FULLPKGNAME} %>"
                     >CVS Web</a>
                 </li>
                 <li>
                     <a
-                      href="https://github.com/openbsd/ports/tree/master/<%= $result->{FULLPKGPATH} %>"
+                      href="https://github.com/openbsd/ports/tree/master/<%= $clean_name %>"
                       title="OpenBSD GitHub page for <%= $result->{FULLPKGNAME} %>"
                     >GitHub</a>
                 </li>