From 33fe7cc872ae28c123ee4716b17392d85a381755 Mon Sep 17 00:00:00 2001
From: Sudoer777's Guix Server <guix-server@sudoer777.dev>
Date: Tue, 21 May 2024 00:52:05 -0500
Subject: [PATCH] Add actual server src

---
 ...ctual-server.scm => actual-server-src.scm} | 21 +++++++------------
 manifest.scm                                  |  2 +-
 2 files changed, 8 insertions(+), 15 deletions(-)
 rename guix-packages/{actual-server.scm => actual-server-src.scm} (57%)

diff --git a/guix-packages/actual-server.scm b/guix-packages/actual-server-src.scm
similarity index 57%
rename from guix-packages/actual-server.scm
rename to guix-packages/actual-server-src.scm
index 0194298..5cb9c30 100644
--- a/guix-packages/actual-server.scm
+++ b/guix-packages/actual-server-src.scm
@@ -8,10 +8,10 @@
 	     (gnu packages node)
 	     (gnu packages package-management))
 
-(define-public actual-server
+(define-public actual-server-src
   (package
-    (name "actual-server")
-    (version "0.0.1") ; Placeholder version
+    (name "actual-server-src")
+    (version "git")
     (source (origin
               (method git-fetch)
               (uri (git-reference
@@ -25,19 +25,12 @@
 	    (arguments
      `(#:tests? #f ; Disable tests for simplicity
        #:phases (modify-phases %standard-phases
-                  (add-before 'configure 'install-yarn
-                    (lambda* (#:key inputs outputs #:allow-other-keys)
-                      (let ((node (assoc-ref inputs "node")))
-                        (setenv "PATH" (string-append node "/bin:" (getenv "PATH")))
-                        (invoke "npm" "install" "--global" "yarn"))))
-                  (replace 'configure
-                    (lambda* (#:key inputs outputs #:allow-other-keys)
-                      (let ((node (assoc-ref inputs "node")))
-                        (setenv "PATH" (string-append node "/bin:" (getenv "PATH")))
-                        (invoke "yarn" "install")))))))
+                  (delete 'configure)
+                  (delete 'build)
+                  (delete 'install))))
     (home-page "https://github.com/actualbudget/actual-server")
     (synopsis "Actual server for budget management")
     (description "Actual is a local-first personal finance tool.")
     (license expat)))
 
-actual-server
+actual-server-src
diff --git a/manifest.scm b/manifest.scm
index 555c1f1..2ddcd2c 100644
--- a/manifest.scm
+++ b/manifest.scm
@@ -1,2 +1,2 @@
 (specifications->manifest
- (list "actual-server"))
+ (list "actual-server-src"))