01/02: gnu: samba/fixed: Do not inherit native-inputs.

[guix-commits]

apteryx pushed a commit to branch master
in repository guix.

commit 2e5d79aca239c10074032b19dfa08da6dab7bd20
Author: Maxim Cournoyer <maxim.cournoyer@gmail.com>
AuthorDate: Tue Sep 27 15:43:20 2022 -0400

    gnu: samba/fixed: Do not inherit native-inputs.
    
    * gnu/packages/samba.scm (samba/fixed): Add a FIXME comment.
    [native-inputs]: Copy the complete native inputs from samba, to protect 
against
    unintended changes in the inherited package.
---
 gnu/packages/samba.scm | 18 +++++++++++++++++-
 1 file changed, 17 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/samba.scm b/gnu/packages/samba.scm
index fdcd6ec991..739aeae369 100644
--- a/gnu/packages/samba.scm
+++ b/gnu/packages/samba.scm
@@ -290,6 +290,8 @@ Samba is an important component to seamlessly integrate 
Linux/Unix Servers and
 Desktops into Active Directory environments using the winbind daemon.")
     (license license:gpl3+)))
 
+;;; FIXME: Invert inheritance relationship; the "fixed" package shouldn't be
+;;; susceptible to changes in the free one.
 (define-public samba/fixed
   ;; Version that rarely changes, depended on by libsoup.
   (hidden-package
@@ -301,7 +303,21 @@ Desktops into Active Directory environments using the 
winbind daemon.")
         (uri (string-append "https://download.samba.org/pub/samba/stable/";
                             "samba-" version ".tar.gz"))
         (sha256
-         (base32 "1nrp85aya0pbbqdqjaqcw82cnzzys16yls37hi2h6mci8d09k4si")))))))
+         (base32 "1nrp85aya0pbbqdqjaqcw82cnzzys16yls37hi2h6mci8d09k4si"))))
+     (native-inputs
+      (list perl-parse-yapp
+            pkg-config
+            python-cryptography         ;for krb5 tests
+            python-dnspython
+            python-iso8601
+            python-markdown
+            rpcsvc-proto                ;for 'rpcgen'
+            python-pyasn1               ;for krb5 tests
+            ;; For generating man pages.
+            docbook-xml-4.2
+            docbook-xsl
+            libxslt
+            libxml2)))))
 
 (define-public talloc
   (package