Oops. Left in an unnecessary `let` form. Updated patch below.
>From f857d3d77f09a6053f910933ae95098bbb70bc30 Mon Sep 17 00:00:00 2001
From: David Thompson <dthomps...@worcester.edu>
Date: Fri, 18 Jul 2014 21:23:58 -0400
Subject: [PATCH] gnu: Add wireless-tools.
* gnu/packages/linux.scm (wireless-tools): New variable.
---
gnu/packages/linux.scm | 26 ++++++++++++++++++++++++++
1 file changed, 26 insertions(+)
diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index b9864f4..6e307e5 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -1329,3 +1329,29 @@ from the module-init-tools project.")
device nodes from /dev/, handles hotplug events and loads drivers at boot
time.")
(license gpl2+))) ; libudev is under lgpl2.1+
+
+(define-public wireless-tools
+ (package
+ (name "wireless-tools")
+ (version "30.pre9")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append "http://www.hpl.hp.com/personal/Jean_Tourrilhes/Linux/wireless_tools.";
+ version ".tar.gz"))
+ (sha256
+ (base32
+ "0qscyd44jmhs4k32ggp107hlym1pcyjzihiai48xs7xzib4wbndb"))))
+ (build-system gnu-build-system)
+ (arguments
+ `(#:phases (alist-replace
+ 'configure
+ (lambda* (#:key outputs #:allow-other-keys)
+ (setenv "PREFIX" (assoc-ref outputs "out")))
+ %standard-phases)
+ #:tests? #f))
+ (synopsis "Tools for manipulating Linux Wireless Extensions")
+ (description "Wireless Tools are used to manipulate the Linux Wireless
+Extensions. The Wireless Extension is an interface allowing you to set
+Wireless LAN specific parameters and get the specific stats.")
+ (home-page "http://www.hpl.hp.com/personal/Jean_Tourrilhes/Linux/Tools.html";)
+ (license gpl2+)))
--
2.0.0
--
David Thompson
Web Developer - Free Software Foundation - http://fsf.org
GPG Key: 0FF1D807
Support the FSF: https://fsf.org/donate
