me/guix
Archived
1
0
Fork 0
Code Activity

gnu: acpi-call-linux-module: Update to 3.17-0.70b9c80.

Browse source 
* gnu/packages/linux.scm (acpi-call-linux-module): Update to
3.17-0.70b9c80.
[arguments]: Remove ‘fix-for-linux-4.12’ phase.
This commit is contained in:
Tobias Geerinckx-Rice 2020-05-07 18:02:43 +02:00
parent 4d36a27887
commit ae1cda76f5
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79
1 changed files with 34 additions and 38 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

72
gnu/packages/linux.scm
View file

@ -965,43 +965,39 @@ It has been modified to remove all non-free binary blobs.")
;;; ;;;
(define-public acpi-call-linux-module (define-public acpi-call-linux-module
(package (let ((commit "70b9c80bd700e6a4d10797eaac9fd34b7e8cbd4a")
(name "acpi-call-linux-module") (revision "0"))
(version "3.17") (package
(source (name "acpi-call-linux-module")
(origin (version (git-version "3.17" revision commit))
(method git-fetch) (source
(uri (git-reference (origin
(url "https://github.com/teleshoes/acpi_call.git") (method git-fetch)
(commit version))) (uri (git-reference
(file-name (git-file-name name version)) (url "https://github.com/teleshoes/acpi_call.git")
(sha256 (commit commit)))
(base32 "04mbv4lasm3vv1j4ndxhnz4hvp5wg8f5fc9q6qxv0nhvwjynmsl3")))) (file-name (git-file-name name version))
(build-system linux-module-build-system) (sha256
(arguments (base32 "09c1vw6vcrkqxbwhpgfgpj4d1grzn4qq6ka8pwwzm7cvm405xj7x"))))
`(#:tests? #f ; no tests (build-system linux-module-build-system)
#:phases (arguments
(modify-phases %standard-phases `(#:tests? #f ; no tests
(add-after 'unpack 'fix-for-linux-4.12 #:phases
(lambda _ (modify-phases %standard-phases
(substitute* "acpi_call.c" (add-after 'install 'install-documentation
(("asm/uaccess\\.h") (lambda* (#:key outputs #:allow-other-keys)
"linux/uaccess.h")) (let* ((out (assoc-ref outputs "out"))
#t)) (doc (string-append out "/share/doc/" ,name "-" ,version)))
(add-after 'install 'install-documentation (for-each (lambda (file)
(lambda* (#:key outputs #:allow-other-keys) (let ((target (string-append doc "/" file)))
(let* ((out (assoc-ref outputs "out")) (mkdir-p (dirname target))
(doc (string-append out "/share/doc/" ,name "-" ,version))) (copy-recursively file target)))
(for-each (lambda (file) (list "README.md" "examples"))
(let ((target (string-append doc "/" file))) #t))))))
(mkdir-p (dirname target)) (home-page "https://github.com/teleshoes/acpi_call")
(copy-recursively file target))) (synopsis "Linux kernel module to perform ACPI method calls")
(list "README.md" "examples")) (description
#t)))))) "This simple Linux kernel module allows calls from user space to any
(home-page "https://github.com/teleshoes/acpi_call")
(synopsis "Linux kernel module to perform ACPI method calls")
(description
"This simple Linux kernel module allows calls from user space to any
@acronym{ACPI, Advanced Configuration and Power Interface} method provided by @acronym{ACPI, Advanced Configuration and Power Interface} method provided by
your computer's firmware, by writing to @file{/proc/acpi/call}. You can pass your computer's firmware, by writing to @file{/proc/acpi/call}. You can pass
any number of parameters of types @code{ACPI_INTEGER}, @code{ACPI_STRING}, any number of parameters of types @code{ACPI_INTEGER}, @code{ACPI_STRING},
@ -1009,7 +1005,7 @@ and @code{ACPI_BUFFER}.
It grants direct and undocumented access to your hardware that may cause damage It grants direct and undocumented access to your hardware that may cause damage
and should be used with caution, especially on untested models.") and should be used with caution, especially on untested models.")
(license license:gpl3+))) ; see README.md (no licence headers) (license license:gpl3+)))) ; see README.md (no licence headers)
(define-public rtl8812au-aircrack-ng-linux-module (define-public rtl8812au-aircrack-ng-linux-module
(let ((commit "945d6ed6505c32f0993b1dba576388e92e78101b") (let ((commit "945d6ed6505c32f0993b1dba576388e92e78101b")