gnu: pulseview: Improve style.

* gnu/packages/electronics.scm (pulseview)[arguments]: Use
G-Expressions.
[description]: Fix max column.

Change-Id: Ic4856ec45270dfd23dc5a5990db18bf25c3ec78c
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Cayetano Santos 2025-08-26 20:48:40 +02:00 committed by Ludovic Courtès
parent 91fb87d0ab
commit b5f1e3671c
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -644,28 +644,29 @@ formats.")
(package (package
(name "pulseview") (name "pulseview")
(version "0.4.2") (version "0.4.2")
(source (origin (source
(method url-fetch) (origin
(uri (string-append (method url-fetch)
"https://sigrok.org/download/source/pulseview/pulseview-" (uri (string-append
version ".tar.gz")) "https://sigrok.org/download/source/pulseview/pulseview-"
(sha256 version ".tar.gz"))
(base32 (sha256
"1jxbpz1h3m1mgrxw74rnihj8vawgqdpf6c33cqqbyd8v7rxgfhph")) (base32
(patches (search-patches "pulseview-qt515-compat.patch" "1jxbpz1h3m1mgrxw74rnihj8vawgqdpf6c33cqqbyd8v7rxgfhph"))
"pulseview-glib-2.68.patch")))) (patches (search-patches "pulseview-qt515-compat.patch"
"pulseview-glib-2.68.patch"))))
(build-system cmake-build-system) (build-system cmake-build-system)
(arguments (arguments
`(#:tests? #f ;format_time_minutes_test is failing (list
#:phases #:tests? #f ;format_time_minutes_test is failing
(modify-phases %standard-phases #:phases
(add-after 'install 'remove-empty-doc-directory #~(modify-phases %standard-phases
(lambda* (#:key outputs #:allow-other-keys) (add-after 'install 'remove-empty-doc-directory
(let ((out (assoc-ref outputs "out"))) (lambda _
(with-directory-excursion (string-append out "/share") (with-directory-excursion (string-append #$output "/share")
;; Use RMDIR to never risk silently deleting files. ;; Use RMDIR to never risk silently deleting files.
(rmdir "doc/pulseview") (rmdir "doc/pulseview")
(rmdir "doc")))))))) (rmdir "doc")))))))
(native-inputs (native-inputs
(list pkg-config qttools-5)) (list pkg-config qttools-5))
(inputs (inputs
@ -678,8 +679,8 @@ formats.")
qtsvg-5)) qtsvg-5))
(home-page "https://www.sigrok.org/wiki/PulseView") (home-page "https://www.sigrok.org/wiki/PulseView")
(synopsis "Qt based logic analyzer, oscilloscope and MSO GUI for sigrok") (synopsis "Qt based logic analyzer, oscilloscope and MSO GUI for sigrok")
(description "PulseView is a Qt based logic analyzer, oscilloscope and MSO GUI (description "PulseView is a Qt based logic analyzer, oscilloscope and MSO
for sigrok.") GUI for sigrok.")
(license license:gpl3+))) (license license:gpl3+)))
(define-public python-cocotb (define-public python-cocotb