gnu: virtuoso-ose: Use G-expressions.

* gnu/packages/databases.scm (virtuoso-ose)[arguments]:
Rewrite as G-expressions.

gnu/packages/databases.scm

@@ -3333,7 +3333,7 @@ Memory-Mapped Database} (LMDB), a high-performance key-value store.")
        (modules '((guix build utils)))
        ;; This snippet removes pre-built Java archives.
        (snippet
-        '(for-each delete-file-recursively
+        #~(for-each delete-file-recursively
                     (list "binsrc/hibernate"
                           "binsrc/jena"
                           "binsrc/jena2"
@@ -3347,14 +3347,16 @@ Memory-Mapped Database} (LMDB), a high-performance key-value store.")
                           "libsrc/JDBCDriverType4")))))
     (build-system gnu-build-system)
     (arguments
-     `(#:tests? #f ; Tests require a network connection.
+     (list
+      #:tests? #f                       ; tests require a network connection
       ;; TODO: Removing the libsrc/zlib source directory breaks the build.
       ;; This indicates that the internal zlib code may still be used.
-       #:configure-flags '("--without-internal-zlib"
+      #:configure-flags
+      #~(list "--without-internal-zlib"
               "--with-readline"
               "--enable-static=no")
       #:phases
-       (modify-phases %standard-phases
+      #~(modify-phases %standard-phases
           (replace 'bootstrap
             (lambda _
               (invoke "sh" "autogen.sh")))
@@ -3392,12 +3394,12 @@ Memory-Mapped Database} (LMDB), a high-performance key-value store.")
           ;; Even with "--enable-static=no", "libvirtuoso-t.a" is left in
           ;; the build output.  The following phase removes it.
           (add-after 'install 'remove-static-libs
-           (lambda* (#:key outputs #:allow-other-keys)
-             (let ((lib (string-append (assoc-ref outputs "out") "/lib")))
-               (for-each (lambda (file)
-                           (delete-file (string-append lib "/" file)))
+            (lambda _
+              (for-each
+               (lambda (file)
+                 (delete-file (string-append #$output "/lib/" file)))
                '("libvirtuoso-t.a"
-                           "libvirtuoso-t.la"))))))))
+                 "libvirtuoso-t.la")))))))
     (native-inputs
      (list autoconf automake bison flex gperf libtool))
     (inputs