~ruther/guix-local: gnu: lynx: Set native-search-paths.

8f35d477f83117e82a491e34d0414d4717bf7954 — Tomas Volf 1 year, 3 months ago 3d09915

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>

patch browse .tar.gz .zip

1 files changed, 4 insertions(+), 2 deletions(-)

M gnu/packages/web-browsers.scm

M gnu/packages/web-browsers.scm => gnu/packages/web-browsers.scm +4 -2

@@ 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))))))