Re: [PATCH] gnu: lynx: Fix GnuTLS support.

[Kei Kebreau]

Leo Famulari <l...@famulari.name> writes:

> On Thu, Oct 06, 2016 at 08:48:31PM -0400, Kei Kebreau wrote:
>> HTTPS connections using lynx work on my machine with this patch. Would
>> someone else like to see about this?
>
> Thanks for working on this!
>
> It still fails for me, but in a different way than before [0]:
>
> -----
> $ lynx https://famulari.name                   
>
> Looking up famulari.name
> Making HTTPS connection to famulari.name
> Retrying connection without TLS.
> Looking up famulari.name
> Making HTTPS connection to famulari.name
> Alert!: Unable to make secure connection to remote host.
>
> lynx: Can't access startfile https://famulari.name/
> -----
>
> I assume that I'm missing some environment variable on this Guix /
> Debian system. Any ideas?
>
> If it works for you, I'd say go for it.
>
>> From c18ab7b9c24f07ab86529d7f5f08f4dd21cea549 Mon Sep 17 00:00:00 2001
>> From: Kei Kebreau <k...@openmailbox.org>
>> Date: Thu, 6 Oct 2016 20:38:39 -0400
>> Subject: [PATCH] gnu: lynx: Fix GnuTLS support.
>> 
>> * gnu/packages/lynx.scm (lynx)[arguments]: Pass "--with-gnutls" in
>
> I think this commit message is truncated.
>
> [0] Without this patch, lynx says:
> Alert!: This client does not contain support for HTTPS URLs.

I get the same problem here. Lynx does mention that GnuTLS support is
experimental. Your and Tobias' page work using OpenSSL instead. Try the
new patch attached.

From ee3a889e6902686de4d7c949afcb8cd4a810bd0f Mon Sep 17 00:00:00 2001
From: Kei Kebreau <k...@openmailbox.org>
Date: Fri, 7 Oct 2016 10:36:11 -0400
Subject: [PATCH] gnu: lynx: Support HTTPS (SSL) connections

* gnu/packages/lynx.scm (lynx)[inputs]: Add 'openssl' and remove 'gnutls'.
[arguments]: Add configure flags for OpenSSL support; remove configure flags
for GnuTLS support.
---
 gnu/packages/lynx.scm | 30 ++++++++++++++++--------------
 1 file changed, 16 insertions(+), 14 deletions(-)

diff --git a/gnu/packages/lynx.scm b/gnu/packages/lynx.scm
index 3182b3e..84e9038 100644
--- a/gnu/packages/lynx.scm
+++ b/gnu/packages/lynx.scm
@@ -46,26 +46,28 @@
                      ("perl" ,perl)))
     (inputs `(("ncurses" ,ncurses)
               ("libidn" ,libidn)
-              ("gnutls" ,gnutls)
+              ("openssl" ,openssl)
               ("libgcrypt" ,libgcrypt)
               ("unzip" ,unzip)
               ("zlib" ,zlib)
               ("gzip" ,gzip)
               ("bzip2" ,bzip2)))
     (arguments
-     `(#:configure-flags '("--with-pkg-config"
-                           "--with-screen=ncurses"
-                           "--with-zlib"
-                           "--with-bzlib"
-                           "--with-gnutls"
-                           ;; "--with-socks5"    ; XXX TODO
-                           "--enable-widec"
-                           "--enable-ascii-ctypes"
-                           "--enable-local-docs"
-                           "--enable-htmlized-cfg"
-                           "--enable-gzip-help"
-                           "--enable-nls"
-                           "--enable-ipv6")
+     `(#:configure-flags
+       (let ((openssl (assoc-ref %build-inputs "openssl")))
+         `("--with-pkg-config"
+           "--with-screen=ncurses"
+           "--with-zlib"
+           "--with-bzlib"
+           ,(string-append "--with-ssl=" openssl)
+           ;; "--with-socks5"    ; XXX TODO
+           "--enable-widec"
+           "--enable-ascii-ctypes"
+           "--enable-local-docs"
+           "--enable-htmlized-cfg"
+           "--enable-gzip-help"
+           "--enable-nls"
+           "--enable-ipv6"))
        #:tests? #f  ; no check target
        #:phases (alist-replace
                  'install
-- 
2.10.0

signature.asc
Description: PGP signature