[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: gnu: Add hdparm.
From: |
Mark H. Weaver |
Subject: |
01/01: gnu: Add hdparm. |
Date: |
Mon, 02 Feb 2015 17:13:59 +0000 |
mhw pushed a commit to branch master
in repository guix.
commit 288084d5355232be11c98945c507d0639bf5bc40
Author: Mark H Weaver <address@hidden>
Date: Mon Feb 2 12:12:52 2015 -0500
gnu: Add hdparm.
* gnu/packages/linux.scm (hdparm): New variable.
---
gnu/packages/linux.scm | 27 +++++++++++++++++++++++++++
1 files changed, 27 insertions(+), 0 deletions(-)
diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index 8383bfa..f482356 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -1785,3 +1785,30 @@ an isolated container, created with the help of Linux
namespaces. It is
similar in functionality to chroot, although pflask provides better isolation
thanks to the use of namespaces.")
(license bsd-2)))
+
+(define-public hdparm
+ (package
+ (name "hdparm")
+ (version "9.45")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append "mirror://sourceforge/" name "/"
+ name "-" version ".tar.gz"))
+ (sha256
+ (base32
+ "0sc6yf3k6sd7n6a2ig2my9fjlqpak3znlyw7jw4cz5d9asm1rc13"))))
+ (build-system gnu-build-system)
+ (arguments
+ `(#:make-flags (let ((out (assoc-ref %outputs "out")))
+ (list (string-append "binprefix=" out)
+ (string-append "manprefix=" out)
+ "CC=gcc"))
+ #:phases (alist-delete 'configure %standard-phases)
+ #:tests? #f)) ; no test suite
+ (home-page "http://sourceforge.net/projects/hdparm/")
+ (synopsis "tune hard disk parameters for high performance")
+ (description
+ "Get/set device parameters for Linux SATA/IDE drives. It's primary use
+is for enabling irq-unmasking and IDE multiplemode.")
+ (license (bsd-style "file://LICENSE.TXT"))))
+