unofficial mirror of guix-patches@gnu.org 
 help / color / mirror / code / Atom feed
* [bug#42975] [PATCH] gnu: akku: Add akku.
@ 2020-08-21 19:24 Martin Becze
  2020-08-23  9:17 ` [bug#42975] [PATCH] v2 " Martin Becze
  0 siblings, 1 reply; 5+ messages in thread
From: Martin Becze @ 2020-08-21 19:24 UTC (permalink / raw)
  To: 42975; +Cc: Martin Becze

* gnu/packages/package-management.scm (akku): New variable.
---
 gnu/packages/package-management.scm | 50 +++++++++++++++++++++++++++++
 1 file changed, 50 insertions(+)

diff --git a/gnu/packages/package-management.scm b/gnu/packages/package-management.scm
index d1fe0e2210..f1951c3218 100644
--- a/gnu/packages/package-management.scm
+++ b/gnu/packages/package-management.scm
@@ -15,6 +15,7 @@
 ;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
 ;;; Copyright © 2020 Giacomo Leidi <goodoldpaul@autistici.org>
 ;;; Copyright © 2020 Jesse Gibbons <jgibbons2357+guix@gmail.com>
+;;; Copyright © 2020 Martin Becze <mjbecze@riseup.net>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -1268,3 +1269,52 @@ applications")
    (description "Flatpak is a system for building, distributing, and running
 sandboxed desktop applications on GNU/Linux.")
    (license license:lgpl2.1+)))
+
+(define-public akku
+  (package
+    (name "akku")
+    (version "1.0.1")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://gitlab.com/akkuscm/akku.git")
+                    (commit (string-append "v" version))))
+              (sha256 (base32 "1dm32ws3nshnnscd7k75zswxxs1pp25y2q4k8j5ms241hz47by3c"))))
+    (build-system gnu-build-system)
+    (arguments
+     '(#:phases (modify-phases %standard-phases
+                  (replace 'bootstrap
+                    (lambda* (#:key outputs #:allow-other-keys)
+                      (for-each patch-shebang
+                                '("bootstrap"
+                                  ".akku/env"))
+                      (let* ((home "/tmp")
+                             (datadir (string-append home "/.local/share/akku/")))
+                        (mkdir-p datadir)
+                        (invoke "touch" (string-append datadir "index.db"))
+                        (setenv "HOME" home))
+                      (invoke "./bootstrap")
+                      #t))
+                  (add-after 'install 'wrap-executables
+                    (lambda* (#:key outputs inputs #:allow-other-keys)
+                      (let ((out (assoc-ref outputs "out"))
+                            (curl (assoc-ref inputs "curl")))
+                        (wrap-program (string-append out "/bin/akku")
+                          `("LD_LIBRARY_PATH" ":" prefix (,(string-append curl "/lib"))))
+                        #t))))))
+    (native-inputs
+     `(("which" ,which)
+       ("autoconf" ,autoconf)
+       ("automake" ,automake)
+       ("pkg-config" ,pkg-config)))
+    (inputs
+     `(("guile" ,guile-2.2)
+       ("curl" ,curl)))
+    (home-page "https://akkuscm.org/")
+    (synopsis "Akku.scm is a language package manager for Scheme")
+    (description
+     "Akku.scm is a project-based language package manager for R6RS and R7RS Scheme.
+It is mainly meant for programmers who develop portable programs or libraries in Scheme,
+but could potentially work for end-users of those programs.  It also has a translator
+from R7RS, which allows most R7RS code to run on R6RS implementations.")
+    (license license:gpl3)))
-- 
2.28.0





^ permalink raw reply related	[flat|nested] 5+ messages in thread

* [bug#42975] [PATCH] v2 gnu: akku: Add akku.
  2020-08-21 19:24 [bug#42975] [PATCH] gnu: akku: Add akku Martin Becze
@ 2020-08-23  9:17 ` Martin Becze
  2020-08-23  9:19   ` Martin Becze
  0 siblings, 1 reply; 5+ messages in thread
From: Martin Becze @ 2020-08-23  9:17 UTC (permalink / raw)
  To: 42975; +Cc: Martin Becze

* gnu/packages/package-management.scm (akku): New variable.
---
 gnu/packages/package-management.scm | 50 +++++++++++++++++++++++++++++
 1 file changed, 50 insertions(+)

diff --git a/gnu/packages/package-management.scm b/gnu/packages/package-management.scm
index d1fe0e2210..f1951c3218 100644
--- a/gnu/packages/package-management.scm
+++ b/gnu/packages/package-management.scm
@@ -15,6 +15,7 @@
 ;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
 ;;; Copyright © 2020 Giacomo Leidi <goodoldpaul@autistici.org>
 ;;; Copyright © 2020 Jesse Gibbons <jgibbons2357+guix@gmail.com>
+;;; Copyright © 2020 Martin Becze <mjbecze@riseup.net>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -1268,3 +1269,52 @@ applications")
    (description "Flatpak is a system for building, distributing, and running
 sandboxed desktop applications on GNU/Linux.")
    (license license:lgpl2.1+)))
+
+(define-public akku
+  (package
+    (name "akku")
+    (version "1.0.1")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://gitlab.com/akkuscm/akku.git")
+                    (commit (string-append "v" version))))
+              (sha256 (base32 "1dm32ws3nshnnscd7k75zswxxs1pp25y2q4k8j5ms241hz47by3c"))))
+    (build-system gnu-build-system)
+    (arguments
+     '(#:phases (modify-phases %standard-phases
+                  (replace 'bootstrap
+                    (lambda* (#:key outputs #:allow-other-keys)
+                      (for-each patch-shebang
+                                '("bootstrap"
+                                  ".akku/env"))
+                      (let* ((home "/tmp")
+                             (datadir (string-append home "/.local/share/akku/")))
+                        (mkdir-p datadir)
+                        (invoke "touch" (string-append datadir "index.db"))
+                        (setenv "HOME" home))
+                      (invoke "./bootstrap")
+                      #t))
+                  (add-after 'install 'wrap-executables
+                    (lambda* (#:key outputs inputs #:allow-other-keys)
+                      (let ((out (assoc-ref outputs "out"))
+                            (curl (assoc-ref inputs "curl")))
+                        (wrap-program (string-append out "/bin/akku")
+                          `("LD_LIBRARY_PATH" ":" prefix (,(string-append curl "/lib"))))
+                        #t))))))
+    (native-inputs
+     `(("which" ,which)
+       ("autoconf" ,autoconf)
+       ("automake" ,automake)
+       ("pkg-config" ,pkg-config)))
+    (inputs
+     `(("guile" ,guile-2.2)
+       ("curl" ,curl)))
+    (home-page "https://akkuscm.org/")
+    (synopsis "Akku.scm is a language package manager for Scheme")
+    (description
+     "Akku.scm is a project-based language package manager for R6RS and R7RS Scheme.
+It is mainly meant for programmers who develop portable programs or libraries in Scheme,
+but could potentially work for end-users of those programs.  It also has a translator
+from R7RS, which allows most R7RS code to run on R6RS implementations.")
+    (license license:gpl3)))
-- 
2.28.0





^ permalink raw reply related	[flat|nested] 5+ messages in thread

* [bug#42975] [PATCH] v2 gnu: akku: Add akku.
  2020-08-23  9:17 ` [bug#42975] [PATCH] v2 " Martin Becze
@ 2020-08-23  9:19   ` Martin Becze
  2020-08-23 18:21     ` [bug#42975] [PATCH v3] gnu: " Martin Becze
  0 siblings, 1 reply; 5+ messages in thread
From: Martin Becze @ 2020-08-23  9:19 UTC (permalink / raw)
  To: 42975


[-- Attachment #1.1: Type: text/plain, Size: 3443 bytes --]

The above fixes some lint errors

On 8/23/20 4:17 AM, Martin Becze wrote:
> * gnu/packages/package-management.scm (akku): New variable.
> ---
>  gnu/packages/package-management.scm | 50 +++++++++++++++++++++++++++++
>  1 file changed, 50 insertions(+)
> 
> diff --git a/gnu/packages/package-management.scm b/gnu/packages/package-management.scm
> index d1fe0e2210..f1951c3218 100644
> --- a/gnu/packages/package-management.scm
> +++ b/gnu/packages/package-management.scm
> @@ -15,6 +15,7 @@
>  ;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
>  ;;; Copyright © 2020 Giacomo Leidi <goodoldpaul@autistici.org>
>  ;;; Copyright © 2020 Jesse Gibbons <jgibbons2357+guix@gmail.com>
> +;;; Copyright © 2020 Martin Becze <mjbecze@riseup.net>
>  ;;;
>  ;;; This file is part of GNU Guix.
>  ;;;
> @@ -1268,3 +1269,52 @@ applications")
>     (description "Flatpak is a system for building, distributing, and running
>  sandboxed desktop applications on GNU/Linux.")
>     (license license:lgpl2.1+)))
> +
> +(define-public akku
> +  (package
> +    (name "akku")
> +    (version "1.0.1")
> +    (source (origin
> +              (method git-fetch)
> +              (uri (git-reference
> +                    (url "https://gitlab.com/akkuscm/akku.git")
> +                    (commit (string-append "v" version))))
> +              (sha256 (base32 "1dm32ws3nshnnscd7k75zswxxs1pp25y2q4k8j5ms241hz47by3c"))))
> +    (build-system gnu-build-system)
> +    (arguments
> +     '(#:phases (modify-phases %standard-phases
> +                  (replace 'bootstrap
> +                    (lambda* (#:key outputs #:allow-other-keys)
> +                      (for-each patch-shebang
> +                                '("bootstrap"
> +                                  ".akku/env"))
> +                      (let* ((home "/tmp")
> +                             (datadir (string-append home "/.local/share/akku/")))
> +                        (mkdir-p datadir)
> +                        (invoke "touch" (string-append datadir "index.db"))
> +                        (setenv "HOME" home))
> +                      (invoke "./bootstrap")
> +                      #t))
> +                  (add-after 'install 'wrap-executables
> +                    (lambda* (#:key outputs inputs #:allow-other-keys)
> +                      (let ((out (assoc-ref outputs "out"))
> +                            (curl (assoc-ref inputs "curl")))
> +                        (wrap-program (string-append out "/bin/akku")
> +                          `("LD_LIBRARY_PATH" ":" prefix (,(string-append curl "/lib"))))
> +                        #t))))))
> +    (native-inputs
> +     `(("which" ,which)
> +       ("autoconf" ,autoconf)
> +       ("automake" ,automake)
> +       ("pkg-config" ,pkg-config)))
> +    (inputs
> +     `(("guile" ,guile-2.2)
> +       ("curl" ,curl)))
> +    (home-page "https://akkuscm.org/")
> +    (synopsis "Akku.scm is a language package manager for Scheme")
> +    (description
> +     "Akku.scm is a project-based language package manager for R6RS and R7RS Scheme.
> +It is mainly meant for programmers who develop portable programs or libraries in Scheme,
> +but could potentially work for end-users of those programs.  It also has a translator
> +from R7RS, which allows most R7RS code to run on R6RS implementations.")
> +    (license license:gpl3)))
> 


[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 488 bytes --]

^ permalink raw reply	[flat|nested] 5+ messages in thread

* [bug#42975] [PATCH v3] gnu: Add akku.
  2020-08-23  9:19   ` Martin Becze
@ 2020-08-23 18:21     ` Martin Becze
  2020-08-23 21:18       ` bug#42975: " Leo Famulari
  0 siblings, 1 reply; 5+ messages in thread
From: Martin Becze @ 2020-08-23 18:21 UTC (permalink / raw)
  To: 42975; +Cc: Martin Becze

* gnu/packages/package-management.scm (akku): New variable.
---
 gnu/packages/package-management.scm | 51 +++++++++++++++++++++++++++++
 1 file changed, 51 insertions(+)

diff --git a/gnu/packages/package-management.scm b/gnu/packages/package-management.scm
index d1fe0e2210..eb5877d167 100644
--- a/gnu/packages/package-management.scm
+++ b/gnu/packages/package-management.scm
@@ -15,6 +15,7 @@
 ;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
 ;;; Copyright © 2020 Giacomo Leidi <goodoldpaul@autistici.org>
 ;;; Copyright © 2020 Jesse Gibbons <jgibbons2357+guix@gmail.com>
+;;; Copyright © 2020 Martin Becze <mjbecze@riseup.net>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -1268,3 +1269,53 @@ applications")
    (description "Flatpak is a system for building, distributing, and running
 sandboxed desktop applications on GNU/Linux.")
    (license license:lgpl2.1+)))
+
+(define-public akku
+  (package
+    (name "akku")
+    (version "1.0.1")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://gitlab.com/akkuscm/akku.git")
+                    (commit (string-append "v" version))))
+              (file-name (git-file-name name version))
+              (sha256 (base32 "1dm32ws3nshnnscd7k75zswxxs1pp25y2q4k8j5ms241hz47by3c"))))
+    (build-system gnu-build-system)
+    (arguments
+     '(#:phases (modify-phases %standard-phases
+                  (replace 'bootstrap
+                    (lambda* (#:key outputs #:allow-other-keys)
+                      (for-each patch-shebang
+                                '("bootstrap"
+                                  ".akku/env"))
+                      (let* ((home "/tmp")
+                             (datadir (string-append home "/.local/share/akku/")))
+                        (mkdir-p datadir)
+                        (invoke "touch" (string-append datadir "index.db"))
+                        (setenv "HOME" home))
+                      (invoke "./bootstrap")
+                      #t))
+                  (add-after 'install 'wrap-executables
+                    (lambda* (#:key outputs inputs #:allow-other-keys)
+                      (let ((out (assoc-ref outputs "out"))
+                            (curl (assoc-ref inputs "curl")))
+                        (wrap-program (string-append out "/bin/akku")
+                          `("LD_LIBRARY_PATH" ":" prefix (,(string-append curl "/lib"))))
+                        #t))))))
+    (native-inputs
+     `(("which" ,which)
+       ("autoconf" ,autoconf)
+       ("automake" ,automake)
+       ("pkg-config" ,pkg-config)))
+    (inputs
+     `(("guile" ,guile-3.0)
+       ("curl" ,curl)))
+    (home-page "https://akkuscm.org/")
+    (synopsis "A language package manager for Scheme")
+    (description
+     "Akku.scm is a project-based language package manager for R6RS and R7RS Scheme.
+It is mainly meant for programmers who develop portable programs or libraries in Scheme,
+but could potentially work for end-users of those programs.  It also has a translator
+from R7RS, which allows most R7RS code to run on R6RS implementations.")
+    (license license:gpl3)))
-- 
2.28.0





^ permalink raw reply related	[flat|nested] 5+ messages in thread

* bug#42975: [PATCH v3] gnu: Add akku.
  2020-08-23 18:21     ` [bug#42975] [PATCH v3] gnu: " Martin Becze
@ 2020-08-23 21:18       ` Leo Famulari
  0 siblings, 0 replies; 5+ messages in thread
From: Leo Famulari @ 2020-08-23 21:18 UTC (permalink / raw)
  To: Martin Becze; +Cc: 42975-done

[-- Attachment #1: Type: text/plain, Size: 764 bytes --]

On Sun, Aug 23, 2020 at 01:21:18PM -0500, Martin Becze wrote:
> * gnu/packages/package-management.scm (akku): New variable.

Thank you!

I pushed as e343816dcb11f0150fa3b14589142c418dfbb0d8 with the following
changes:

> +    (synopsis "A language package manager for Scheme")

To satisfy the linter's complaint "no article allowed at the beginning
of the synopsis", I removed the first word of the synopsis.

The common English articles are the words A, An, and The. We consider
them unecessary in this context.

> +    (license license:gpl3)))

I changed this to gpl3+.

I made that decision based on the COPYING file, and the license headers
of the files in the bin and lib directories, which consistently include
the text "(at your option) any later version".

[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 833 bytes --]

^ permalink raw reply	[flat|nested] 5+ messages in thread

end of thread, other threads:[~2020-08-23 21:19 UTC | newest]

Thread overview: 5+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2020-08-21 19:24 [bug#42975] [PATCH] gnu: akku: Add akku Martin Becze
2020-08-23  9:17 ` [bug#42975] [PATCH] v2 " Martin Becze
2020-08-23  9:19   ` Martin Becze
2020-08-23 18:21     ` [bug#42975] [PATCH v3] gnu: " Martin Becze
2020-08-23 21:18       ` bug#42975: " Leo Famulari

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).