Re: [ANN] Guile-SSH 0.7.0 released

[Ludovic Courtès]

Artyom Poptsov <address@hidden> skribis:

> Could you please test the latest commit (6c1706a) from the branch and
> check if it works for you?

I tried that (patch attached, for reference.)

There are still test failures though, so I’m attaching the logs again.
I’m afraid it’s not that helpful though.   :-/

Let me know if you have ideas on how to further debug it.

Thanks,
Ludo’.

diff --git a/gnu/packages/ssh.scm b/gnu/packages/ssh.scm
index a22468a..3ab5bd1 100644
--- a/gnu/packages/ssh.scm
+++ b/gnu/packages/ssh.scm
@@ -37,6 +37,7 @@
   #:use-module (gnu packages)
   #:use-module (guix packages)
   #:use-module (guix download)
+  #:use-module (guix git-download)
   #:use-module (guix build-system gnu)
   #:use-module (guix build-system cmake))
 
@@ -176,25 +177,21 @@ Additionally, various channel-specific options can be 
negotiated.")
 (define-public guile-ssh
   (package
     (name "guile-ssh")
-    (version "0.6.0")
+    (version "0.7.0")
     (source (origin
-              (method url-fetch)
-              (uri (string-append
-                    "https://github.com/artyom-poptsov/libguile-ssh/archive/v";
-                    version ".tar.gz"))
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://github.com/artyom-poptsov/libguile-ssh.git";)
+                    (commit "6c1706a1535dc58035d41cc660166860e53dc0de")))
               (sha256
                (base32
-                "1v4y5vrwg0g6804pzbr160zahlqvj7k7iwys2bdpfzp7m2i47siq"))))
+                "0xf7cz5519fg1dpiqlc1djd1yjsijld9z72vg01g0lcnmh12wmjp"))))
     (build-system gnu-build-system)
     (arguments
      '(#:phases (alist-cons-before
                  'configure 'autoreconf
                  (lambda* (#:key inputs #:allow-other-keys)
-                   (substitute* "ssh/Makefile.am"
-                     (("-lssh_threads" match)
-                      (string-append "-L" (assoc-ref inputs "libssh")
-                                     "/lib " match)))
-
+                   (chmod "doc/version.texi" #o777) ;make it writable
                    (zero? (system* "autoreconf" "-vfi")))
                  (alist-cons-after
                   'install 'fix-libguile-ssh-file-name
@@ -216,9 +213,6 @@ Additionally, various channel-specific options can be 
negotiated.")
                                               (assoc-ref %outputs "out")
                                               "/share/guile/site/2.0"))
 
-       ;; Building the .go requires building libguile-ssh.so first.
-       #:parallel-build? #f
-
        ;; Tests are not parallel-safe.
        #:parallel-tests? #f))
     (native-inputs `(("autoconf" ,autoconf)
@@ -228,7 +222,7 @@ Additionally, various channel-specific options can be 
negotiated.")
                      ("pkg-config" ,pkg-config)
                      ("which" ,which)))
     (inputs `(("guile" ,guile-2.0)
-              ("libssh" ,libssh-0.5)))
+              ("libssh" ,libssh)))
     (synopsis "Guile bindings to libssh")
     (description
      "Guile-SSH is a library that provides access to the SSH protocol for

test-suite.log
Description: Binary data

key.log
Description: Binary data

sssh-ssshd.log
Description: Binary data

server-client.log
Description: Binary data

server-client-errors.log
Description: Binary data

server-client-libssh.log
Description: Binary data

client-server-libssh.log
Description: Binary data

client-server.log
Description: Binary data

client-server-errors.log
Description: Binary data

session.log
Description: Binary data

server.log
Description: Binary data

log.log
Description: Binary data