gnu: ddcci-driver-linux: Use G-expressions.

* gnu/packages/linux.scm (ddcci-driver-linux)[arguments]:
Rewrite as G-expressions.

gnu/packages/linux.scm

@@ -1484,23 +1484,23 @@ graphics card on Optimus laptops.")
         (base32 "1lww3mnqhxqzj0qbxzbwbq93v9zw49myp7p9ib873a5izbq8nadi"))))
     (build-system linux-module-build-system)
     (arguments
-     `(#:tests? #f                               ; no tests
+     (list #:tests? #f                  ; no tests
-       #:phases
+           #:phases
-       (modify-phases %standard-phases
+           #~(modify-phases %standard-phases
-         (replace 'build
+               (replace 'build
-           (lambda args
+                 (lambda args
-             (for-each
+                   (for-each
-              (lambda (module)
+                    (lambda (module)
-                (with-directory-excursion module
+                      (with-directory-excursion module
-                  (apply (assoc-ref %standard-phases 'build) args)))
+                        (apply (assoc-ref %standard-phases 'build) args)))
-              '("ddcci" "ddcci-backlight"))))
+                    '("ddcci" "ddcci-backlight"))))
-         (replace 'install
+               (replace 'install
-           (lambda args
+                 (lambda args
-             (for-each
+                   (for-each
-              (lambda (module)
+                    (lambda (module)
-                (with-directory-excursion module
+                      (with-directory-excursion module
-                  (apply (assoc-ref %standard-phases 'install) args)))
+                        (apply (assoc-ref %standard-phases 'install) args)))
-              '("ddcci" "ddcci-backlight")))))))
+                    '("ddcci" "ddcci-backlight")))))))
     (home-page "https://gitlab.com/ddcci-driver-linux/ddcci-driver-linux")
     (synopsis "Pair of Linux kernel drivers for DDC/CI monitors")
     (description "This package provides two Linux kernel drivers, ddcci and