ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-12 06:06:53 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: qtserialbus: Add libsocketcan support.

Browse source 
* gnu/packages/qt.scm (qtserialbus)[inputs]: Add libsocketcan.
[phases]{patch-libsocketcan-reference}: Add phase.
This commit is contained in:
Maxim Cournoyer 2020-08-10 16:37:26 -04:00
parent 34d4bed23c
commit 12bb72fb0f
No known key found for this signature in database
GPG key ID: 1260E46482E63562
1 changed files with 17 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
gnu/packages/qt.scm
View file

@ -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