guix_mirror_bot pushed a commit to branch master
in repository guix.

commit b5f1e3671c486153d10f176460ef64c29441d5ee
Author: Cayetano Santos <[email protected]>
AuthorDate: Tue Aug 26 20:48:40 2025 +0200

    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 <[email protected]>
---
 gnu/packages/electronics.scm | 45 ++++++++++++++++++++++----------------------
 1 file changed, 23 insertions(+), 22 deletions(-)

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

Reply via email to