gnu: rosegarden: Improve package style.

* gnu/packages/music.scm (rosegarden)[arguments]: Use G-expressions and
SEARCH-INPUT-FILE.
[inputs]: Use BASH-MINIMAL instead of BASH.

gnu/packages/music.scm

@@ -5019,9 +5019,10 @@ specification and header.")
         (base32 "061xy3flmj7bllibkp5wzdycvghfxvyzdr9g9yrr5q3m70a7wznz"))))
     (build-system cmake-build-system)
     (arguments
-     `(#:configure-flags '("-DCMAKE_BUILD_TYPE=Release")
+     (list
+      #:configure-flags #~(list "-DCMAKE_BUILD_TYPE=Release")
       #:phases
-       (modify-phases %standard-phases
+      #~(modify-phases %standard-phases
           (add-after 'unpack 'patch-tests
             (lambda _
               (substitute* "CMakeLists.txt"
@@ -5032,20 +5033,20 @@ specification and header.")
             (lambda* (#:key inputs #:allow-other-keys)
               (substitute* "src/gui/general/ProjectPackager.cpp"
                 (("\"flac\\>")
-                (string-append "\"" (assoc-ref inputs "flac") "/bin/flac"))
+                 (string-append "\"" (search-input-file inputs "/bin/flac")))
                 (("\"wavpack\\>")
-                (string-append "\"" (assoc-ref inputs "wavpack") "/bin/wavpack"))
+                 (string-append "\"" (search-input-file inputs "/bin/wavpack")))
                 (("\"wvunpack\\>")
-                (string-append "\"" (assoc-ref inputs "wavpack") "/bin/wvunpack"))
+                 (string-append "\"" (search-input-file inputs "/bin/wvunpack")))
                 (("\"bash\\>")
-                (string-append "\"" (assoc-ref inputs "bash") "/bin/bash"))
+                 (string-append "\"" (search-input-file inputs "/bin/bash")))
                 (("\"tar\\>")
-                (string-append "\"" (assoc-ref inputs "tar") "/bin/tar")))
+                 (string-append "\"" (search-input-file inputs "/bin/tar"))))
               (substitute* "src/gui/general/LilyPondProcessor.cpp"
                 (("\"convert-ly\\>")
-                (string-append "\"" (assoc-ref inputs "lilypond") "/bin/convert-ly"))
+                 (string-append "\"" (search-input-file inputs "/bin/convert-ly")))
                 (("\"lilypond\\>")
-                (string-append "\"" (assoc-ref inputs "lilypond") "/bin/lilypond")))))
+                 (string-append "\"" (search-input-file inputs "/bin/lilypond"))))))
           (add-after 'unpack 'make-reproducible
             (lambda _
               ;; Prevent Last-Modified from being written.
@@ -5070,7 +5071,7 @@ specification and header.")
               (setenv "XDG_RUNTIME_DIR" "/tmp/foo"))))))
     (inputs
      (list alsa-lib
-           bash
+           bash-minimal
            dssi
            flac
            fftwf