rosenthal: atuin: Update to 18.9.0.

* modules/rosenthal/packages/rust-apps.scm (atuin): Update to 18.9.0.
[arguments] <#:cargo-install-paths>: Set to "crates/atuin".
<#:features, #:phases>: Update accordingly.
* modules/rosenthal/packages/rust-crates.scm (lookup-cargo-inputs) [atuin]:
Update.

modules/rosenthal/packages/rust-apps.scm

@@ -17,7 +17,7 @@
 (define-public atuin
   (package
     (name "atuin")
-    (version "18.4.0")
+    (version "18.9.0")
     (source (origin
               (method git-fetch)
               (uri (git-reference
@@ -26,52 +26,23 @@
               (file-name (git-file-name name version))
               (sha256
                (base32
-                "1zi7ar999ycvig9c9crylab540xdgr0h6v99q9j8ypk9i1fviyiz"))))
+                "026acssbzz01xfzl3acq56szzpyh76dzwp2m8z1pi29hlmbnyfli"))))
     (build-system cargo-build-system)
     (arguments
      (list
       #:tests? #f                       ;TODO.
       #:install-source? #f
       #:features
-      ''("client" "sync" "server" "clipboard" "daemon")
+      ''("client" "sync" "clipboard" "daemon")
+      #:cargo-install-paths
+      ''("crates/atuin")
       #:phases
       #~(modify-phases %standard-phases
-          (add-after 'unpack 'disable-failing-tests
-            (lambda _
-              (substitute* '("crates/atuin/tests/sync.rs"
-                             "crates/atuin/tests/users.rs"
-                             "crates/atuin-dotfiles/src/store.rs"
-                             "crates/atuin-dotfiles/src/store/var.rs")
-                (((string-append
-                   ".*async fn (" (string-join
-                                   '(;; Require running database.
-                                     "build_aliases"
-                                     "build_vars"
-                                     "sync"
-                                     "registration"
-                                     "change_password"
-                                     "multi_user_test")
-                                   "|") ")")
-                  all)
-                 (string-append "#[ignore]\n" all)))))
           (add-after 'unpack 'patch-references
             (lambda _
               (substitute* (find-files "crates/atuin/src/shell")
                 (("atuin (uuid|history|search)" all)
-                 (string-append #$output "/bin/" all)))))
+                 (string-append #$output "/bin/" all))))))))
-          (replace 'install
-            (lambda* (#:key outputs features #:allow-other-keys)
-              (let* ((out      (assoc-ref outputs "out"))
-                     (registry (string-append out "/share/cargo/registry"))
-                     (sources  (string-append out "/share/cargo/src")))
-                (mkdir-p out)
-                ;; Make cargo reuse all the artifacts we just built instead
-                ;; of defaulting to making a new temp directory
-                (setenv "CARGO_TARGET_DIR" "./target")
-                ;; Only install crates which include binary targets,
-                ;; otherwise cargo will raise an error.
-                (invoke "cargo" "install" "--no-track" "--path" "crates/atuin"
-                        "--root" out "--features" (string-join features))))))))
     (inputs (cons sqlite (rosenthal-cargo-inputs 'atuin)))
     (home-page "https://atuin.sh/")
     (synopsis "Sync, search and backup shell history")
@@ -79,6 +50,4 @@
      "Atuin replaces existing shell history with a SQLite database, and records
 additional context for commands.  Additionally, it provides optional and fully
 encrypted synchronisation of history between machines, via an Atuin server.")
-    (license license:expat)
+    (license license:expat)))
-    (properties
-     '((disable-updater? . #t)))))