diff options
author | Franz Geffke <franz@pantherx.org> | 2024-03-30 12:31:23 +0000 |
---|---|---|
committer | Franz Geffke <franz@pantherx.org> | 2024-03-30 12:31:23 +0000 |
commit | 7840592aa80d9162b67b30918213ce74ecc4f503 (patch) | |
tree | 79cd0e8d6b876d18c9a2f6a4b7e8270b063d9bb0 /px/packages/backup.scm | |
parent | 9743615b6e038798a98c31380be4e2417a76a37e (diff) |
drop px-org-remote-backup-service
Diffstat (limited to 'px/packages/backup.scm')
-rw-r--r-- | px/packages/backup.scm | 50 |
1 files changed, 0 insertions, 50 deletions
diff --git a/px/packages/backup.scm b/px/packages/backup.scm index bd429d3..081f159 100644 --- a/px/packages/backup.scm +++ b/px/packages/backup.scm @@ -21,56 +21,6 @@ #:use-module (px packages library) #:use-module (px packages tarsnap)) -(define-public px-org-remote-backup-service - (package - (name "px-org-remote-backup-service") - (version "v0.0.6") - (source - (origin - (method url-fetch) - (uri (string-append - "https://source.pantherx.org/px-org-remote-backup-service_" - version ".tgz")) - (sha256 - (base32 "062p4p6jf8y8cw2pdxj50sw00sw9lfh404168ljhqqgzwhdxpp6p")))) - (build-system trivial-build-system) - (arguments - `(#:modules ((guix build utils)) - #:builder (begin - (use-modules (guix build utils) - (srfi srfi-26)) - (let* ((source (assoc-ref %build-inputs "source")) - (tar (assoc-ref %build-inputs "tar")) - (ls (assoc-ref %build-inputs "source")) - (gzip (assoc-ref %build-inputs "gzip")) - (bin-dir (string-append %output "/bin")) - (backup-bin-file (string-append bin-dir "/" - ,"px-org-remote-backup-create.sh")) - (restore-bin-file (string-append bin-dir "/" - ,"px-org-remote-backup-restore.sh")) - (bash-bin (string-append (assoc-ref %build-inputs - "bash") "/bin"))) - (mkdir-p bin-dir) - (setenv "PATH" - (string-append gzip "/bin")) - (invoke (string-append tar "/bin/tar") "xvf" source "-C" - bin-dir) - (patch-shebang backup-bin-file - (list bash-bin)) - (patch-shebang restore-bin-file - (list bash-bin)) - (chmod backup-bin-file #o555) - (chmod restore-bin-file #o555))))) - (native-inputs `(("tar" ,tar) - ("gzip" ,gzip))) - (inputs `(("bash" ,bash))) - (propagated-inputs `(("tarsnap" ,tarsnap))) - (home-page "https://www.pantherx.org/") - (synopsis "PantherX Backup/Restore shell scripts") - (description - "This package provides two scripts for create backup and restore based on given user as parameter.") - (license license:expat))) - (define-public px-backup (package (name "px-backup") |