Revert "packages: 'package-grafts' trims native inputs."

This reverts commit 91c9b5d016ac8bed127557d378c70fbc56cec0e5
following the concerns raised by Mark, Ben, and Tobias:
<https://lists.gnu.org/archive/html/guix-devel/2017-12/msg00081.html>.

1 files changed, 0 insertions, 18 deletions

diff --git a/tests/packages.scm b/tests/packages.scm
index fe7bd1ded69..930374dabfa 100644
--- a/tests/packages.scm
+++ b/tests/packages.scm
@@ -660,24 +660,6 @@
 ;;     (package-cross-derivation %store p "mips64el-linux-gnu"
 ;;                               #:graft? #t)))
 
-;; It doesn't make sense for 'package-grafts' to look at native inputs since,
-;; by definition, they are not referenced at run time.  Make sure
-;; 'package-grafts' respects this.
-(test-equal "package-grafts, grafts of native inputs ignored"
-  '()
-  (let* ((new   (dummy-package "native-dep"
-                  (version "0.1")
-                  (arguments '(#:implicit-inputs? #f))))
-         (ndep  (package (inherit new) (version "0.0")
-                         (replacement new)))
-         (dep   (dummy-package "dep"
-                  (arguments '(#:implicit-inputs? #f))))
-         (dummy (dummy-package "dummy"
-                  (arguments '(#:implicit-inputs? #f))
-                  (native-inputs `(("ndep" ,ndep)))
-                  (inputs `(("dep" ,dep))))))
-    (package-grafts %store dummy)))
-
 (test-assert "package-grafts, indirect grafts"
   (let* ((new   (dummy-package "dep"
                   (arguments '(#:implicit-inputs? #f))))