From 8f35d477f83117e82a491e34d0414d4717bf7954 Mon Sep 17 00:00:00 2001
From: Tomas Volf <~@wolfsden.cz>
Date: Sun, 16 Mar 2025 15:02:23 +0100
Subject: [PATCH] gnu: lynx: Set native-search-paths.

This allows discovery of certificates upon adding nss-certs into the profile.

* gnu/packages/web-browsers.scm (lynx)[native-search-paths]: Set to
$SSL_CERT_DIR and $SSL_CERT_FILE.
[arguments]: Fix indentation.

Change-Id: Ib2383bd21a4177f87067a12aeb987b2591f3f4e8
Signed-off-by: Ian Eure <ian@retrospec.tv>
---
 gnu/packages/web-browsers.scm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/web-browsers.scm b/gnu/packages/web-browsers.scm
index 6bd657e6a5d893186cd08a91d4e0bedcca2dff67..d6287f86540c83144d111f3ca01de3949b28a5da 100644
--- a/gnu/packages/web-browsers.scm
+++ b/gnu/packages/web-browsers.scm
@@ -109,7 +109,8 @@
   #:use-module (gnu packages web)
   #:use-module (gnu packages webkit)
   #:use-module (gnu packages xml)
-  #:use-module (gnu packages xorg))
+  #:use-module (gnu packages xorg)
+  #:use-module ((guix search-paths) #:select ($SSL_CERT_DIR $SSL_CERT_FILE)))
 
 (define-public midori
   (package
@@ -375,6 +376,7 @@ and the GTK+ toolkit.")
                   zlib
                   gzip
                   bzip2))
+    (native-search-paths (list $SSL_CERT_DIR $SSL_CERT_FILE))
     (arguments
      (list #:configure-flags
            #~(let ((openssl #$(this-package-input "openssl")))
@@ -396,7 +398,7 @@ and the GTK+ toolkit.")
            #~(modify-phases %standard-phases
                (add-before 'configure 'set-makefile-shell
                  (lambda _ (substitute* "po/makefile.inn"
-                        (("/bin/sh") (which "sh")))))
+                             (("/bin/sh") (which "sh")))))
                (replace 'install
                  (lambda* (#:key (make-flags '()) #:allow-other-keys)
                    (apply invoke "make" "install-full" make-flags))))))