ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-29 07:42:23 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: pgloader: Use G-expressions.

Browse source 
* gnu/packages/databases.scm (pgloader)[arguments]:
Rewrite as G-expressions.
[inputs]: Remove input labels.
This commit is contained in:
Tobias Geerinckx-Rice 2022-01-04 05:24:02 +01:00
parent 1ae855a549
commit 9bffe30be8
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79
1 changed files with 50 additions and 53 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

79
gnu/packages/databases.scm
View file

@ -1210,62 +1210,59 @@ (define-public pgloader
;; dependent on Quicklisp, main build target is `pgloader-standalone' which ;; dependent on Quicklisp, main build target is `pgloader-standalone' which
;; does not require Quicklisp workarounds. There is no `install' target ;; does not require Quicklisp workarounds. There is no `install' target
;; configured in Makefile. ;; configured in Makefile.
`(#:tests? #f (list #:tests? #f
#:strip-binaries? #f #:strip-binaries? #f
#:make-flags #:make-flags
(list "pgloader-standalone" "BUILDAPP_SBCL=buildapp") #~(list "pgloader-standalone" "BUILDAPP_SBCL=buildapp")
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(delete 'configure) (delete 'configure)
(add-after 'unpack 'set-home (add-after 'unpack 'set-home
(lambda _ (lambda _
(setenv "HOME" "/tmp") (setenv "HOME" "/tmp")))
#t))
(add-after 'unpack 'patch-Makefile (add-after 'unpack 'patch-Makefile
(lambda _ (lambda _
(substitute* "Makefile" (substitute* "Makefile"
(("--sbcl.*") "--sbcl $(CL) --asdf-path . \\\n")) (("--sbcl.*") "--sbcl $(CL) --asdf-path . \\\n"))))
#t))
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((bin (string-append (assoc-ref outputs "out") "/bin"))) (let ((bin (string-append #$output "/bin")))
(mkdir-p bin) (mkdir-p bin)
(install-file "build/bin/pgloader" bin)) (install-file "build/bin/pgloader" bin)))))))
#t)))))
(native-inputs (native-inputs
(list buildapp sbcl)) (list buildapp sbcl))
(inputs (inputs
`(("alexandria" ,sbcl-alexandria) (list sbcl-alexandria
("cl-abnf" ,sbcl-cl-abnf) sbcl-cl-abnf
("cl-base64" ,sbcl-cl-base64) sbcl-cl-base64
("cl-csv" ,sbcl-cl-csv) sbcl-cl-csv
("cl-fad" ,sbcl-cl-fad) sbcl-cl-fad
("cl-log" ,sbcl-cl-log) sbcl-cl-log
("cl-markdown" ,sbcl-cl-markdown) sbcl-cl-markdown
("cl-mustache" ,sbcl-cl-mustache) sbcl-cl-mustache
("cl-ppcre" ,sbcl-cl-ppcre) sbcl-cl-ppcre
("cl-sqlite" ,sbcl-cl-sqlite) sbcl-cl-sqlite
("closer-mop" ,sbcl-closer-mop) sbcl-closer-mop
("command-line-arguments" ,sbcl-command-line-arguments) sbcl-command-line-arguments
("db3" ,sbcl-db3) sbcl-db3
("drakma" ,sbcl-drakma) sbcl-drakma
("esrap" ,sbcl-esrap) sbcl-esrap
("flexi-streams" ,sbcl-flexi-streams) sbcl-flexi-streams
("ixf" ,sbcl-ixf) sbcl-ixf
("local-time" ,sbcl-local-time) sbcl-local-time
("lparallel" ,sbcl-lparallel) sbcl-lparallel
("metabang-bind" ,sbcl-metabang-bind) sbcl-metabang-bind
("mssql" ,sbcl-mssql) sbcl-mssql
("postmodern" ,sbcl-postmodern) sbcl-postmodern
("py-configparser" ,sbcl-py-configparser) sbcl-py-configparser
("qmynd" ,sbcl-qmynd) sbcl-qmynd
("quri" ,sbcl-quri) sbcl-quri
("split-sequence" ,sbcl-split-sequence) sbcl-split-sequence
("trivial-backtrace" ,sbcl-trivial-backtrace) sbcl-trivial-backtrace
("usocket" ,sbcl-usocket) sbcl-usocket
("uuid" ,sbcl-uuid) sbcl-uuid
("yason" ,sbcl-yason) sbcl-yason
("zs3" ,sbcl-zs3))) sbcl-zs3))
(home-page "https://pgloader.io/") (home-page "https://pgloader.io/")
(synopsis "Tool to migrate data to PostgreSQL") (synopsis "Tool to migrate data to PostgreSQL")
(description (description