bug#58215: curl: Enable sftp and scp protocols.

bug#58215: curl: Enable sftp and scp protocols.

[elaexuotee--- via Bug reports for GNU Guix]

[-- Attachment #1: Type: text/plain, Size: 186 bytes --]

Apparently, our curl is compiled without libssl2 support enabled,

    $ curl scp://...
    curl: (1) Protocol "scp" not supported or disabled in libcurl

This patch fixes that.


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: 0001-curl-Enable-sftp-and-scp-protocols.patch --]
[-- Type: text/x-patch, Size: 1661 bytes --]

From 7d90bdbd6377ca29387d0482eefc5f051ff524ed Mon Sep 17 00:00:00 2001
From: "B. Wilson" <elaexuotee@wilsonb.com>
Date: Sat, 1 Oct 2022 17:00:44 +0900
Subject: [PATCH] curl: Enable sftp and scp protocols.
To: bug-guix@gnu.org

---
 gnu/packages/curl.scm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/curl.scm b/gnu/packages/curl.scm
index d82d94abff..29f70f1abe 100644
--- a/gnu/packages/curl.scm
+++ b/gnu/packages/curl.scm
@@ -14,6 +14,7 @@
 ;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
 ;;; Copyright © 2021 Jean-Baptiste Volatier <jbv@pm.me>
 ;;; Copyright © 2021 Felix Gruber <felgru@posteo.net>
+;;; Copyright © 2022 B. Wilson <elaexuotee@wilsonb.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -76,7 +77,7 @@ (define-public curl
    (build-system gnu-build-system)
    (outputs '("out"
               "doc"))                             ;1.2 MiB of man3 pages
-   (inputs (list gnutls libidn mit-krb5
+   (inputs (list gnutls libidn libssh2 mit-krb5
                  `(,nghttp2 "lib") zlib))
    (native-inputs
      `(("nghttp2" ,nghttp2)
@@ -100,6 +101,8 @@ (define-public curl
       #:configure-flags (list "--with-gnutls"
                               (string-append "--with-gssapi="
                                              (assoc-ref %build-inputs "mit-krb5"))
+                              (string-append "--with-libssh2="
+                                             (assoc-ref %build-inputs "libssh2"))
                               "--disable-static")
       #:phases
       (modify-phases %standard-phases
-- 
2.37.3