mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-12 06:06:53 -05:00
gnu: qtserialbus: Add libsocketcan support.
* gnu/packages/qt.scm (qtserialbus)[inputs]: Add libsocketcan. [phases]{patch-libsocketcan-reference}: Add phase.
This commit is contained in:
parent
34d4bed23c
commit
12bb72fb0f
1 changed files with 17 additions and 1 deletions
|
@ -19,6 +19,7 @@
|
||||||
;;; Copyright © 2020 TomZ <tomz@freedommail.ch>
|
;;; Copyright © 2020 TomZ <tomz@freedommail.ch>
|
||||||
;;; Copyright © 2020 Jonathan Brielmaier <jonathan.brielmaier@web.de>
|
;;; Copyright © 2020 Jonathan Brielmaier <jonathan.brielmaier@web.de>
|
||||||
;;; Copyright © 2020 Michael Rohleder <mike@rohleder.de>
|
;;; Copyright © 2020 Michael Rohleder <mike@rohleder.de>
|
||||||
|
;;; Copyright © 2020 Maxim Cournoyer <maxim.cournoyer@gmail.com>
|
||||||
;;;
|
;;;
|
||||||
;;; This file is part of GNU Guix.
|
;;; This file is part of GNU Guix.
|
||||||
;;;
|
;;;
|
||||||
|
@ -74,6 +75,7 @@ (define-module (gnu packages qt)
|
||||||
#:use-module (gnu packages linux)
|
#:use-module (gnu packages linux)
|
||||||
#:use-module (gnu packages llvm)
|
#:use-module (gnu packages llvm)
|
||||||
#:use-module (gnu packages maths)
|
#:use-module (gnu packages maths)
|
||||||
|
#:use-module (gnu packages networking)
|
||||||
#:use-module (gnu packages ninja)
|
#:use-module (gnu packages ninja)
|
||||||
#:use-module (gnu packages nss)
|
#:use-module (gnu packages nss)
|
||||||
#:use-module (gnu packages pciutils)
|
#:use-module (gnu packages pciutils)
|
||||||
|
@ -1077,8 +1079,22 @@ (define-public qtserialbus
|
||||||
(sha256
|
(sha256
|
||||||
(base32
|
(base32
|
||||||
"14bahg82jciciqkl74q9hvf3a8kp3pk5v731vp2416k4b8bn4xqb"))))
|
"14bahg82jciciqkl74q9hvf3a8kp3pk5v731vp2416k4b8bn4xqb"))))
|
||||||
|
(arguments
|
||||||
|
(substitute-keyword-arguments (package-arguments qtsvg)
|
||||||
|
((#:phases phases '%standard-phases)
|
||||||
|
`(modify-phases ,phases
|
||||||
|
(add-after 'unpack 'patch-libsocketcan-reference
|
||||||
|
(lambda* (#:key inputs #:allow-other-keys)
|
||||||
|
(let* ((libcansocket (assoc-ref inputs "libsocketcan"))
|
||||||
|
(libcansocket.so (string-append libcansocket
|
||||||
|
"/lib/libsocketcan.so")))
|
||||||
|
(substitute* "src/plugins/canbus/socketcan/libsocketcan.cpp"
|
||||||
|
(("QStringLiteral\\(\"socketcan\"\\)")
|
||||||
|
(format #f "QStringLiteral(~s)" libcansocket.so)))
|
||||||
|
#t)))))))
|
||||||
(inputs
|
(inputs
|
||||||
`(("qtbase" ,qtbase)
|
`(("libsocketcan" ,libsocketcan)
|
||||||
|
("qtbase" ,qtbase)
|
||||||
("qtserialport" ,qtserialport)))
|
("qtserialport" ,qtserialport)))
|
||||||
(synopsis "Qt Serial Bus module")
|
(synopsis "Qt Serial Bus module")
|
||||||
(description "The Qt Serial Bus API provides classes and functions to
|
(description "The Qt Serial Bus API provides classes and functions to
|
||||||
|
|
Loading…
Reference in a new issue