1 files changed, 73 insertions(+), 0 deletions(-)

A guixrus/packages/git-arr.scm

@@ 0,0 1,73 @@
+;;; GNU Guix --- Functional package management for GNU
+;;;
+;;; Copyright © 2022 jgart <jgart@dismail.de>
+;;; This file is not part of GNU Guix.
+;;;
+;;; GNU Guix is free software; you can redistribute it and/or modify it
+;;; under the terms of the GNU General Public License as published by
+;;; the Free Software Foundation; either version 3 of the License, or (at
+;;; your option) any later version.
+;;;
+;;; GNU Guix is distributed in the hope that it will be useful, but
+;;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;;; GNU General Public License for more details.
+;;;
+;;; You should have received a copy of the GNU General Public License
+;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
+
+(define-module (guixrus packages git-arr)
+  #:use-module (guix build-system python)
+  #:use-module (guix download)
+  #:use-module (guix git-download)
+  #:use-module ((guix licenses) #:prefix license:)
+  #:use-module (guix packages)
+  #:use-module (guix utils)
+  #:use-module (gnu packages)
+  #:use-module (gnu packages check)
+  #:use-module (gnu packages python-build)
+  #:use-module (gnu packages python-check)
+  #:use-module (gnu packages python)
+  #:use-module (gnu packages python-web)
+  #:use-module (gnu packages python-xyz))
+
+(define-public git-arr
+  (package
+    (name "git-arr")
+    (version "0.30")
+    (source
+       (origin
+         (method git-fetch)
+         (uri
+          (git-reference
+           (url "https://blitiri.com.ar/repos/git-arr")
+           (commit version)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "1bbk2xl9zxpk3is9j0i0m4cdf3lcvikpcphj55hdiwhnx92998qv"))))
+    (build-system python-build-system)
+    (arguments
+     `(#:tests? #f ; There are no tests.
+       #:phases
+       (modify-phases %standard-phases
+         (replace 'build
+           (lambda _
+             (invoke "python" "-m" "build" "--wheel" "--no-isolation" ".")))
+         (replace 'install
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let ((out (assoc-ref outputs "out"))
+                   (whl (car (find-files "dist" "\\.whl$"))))
+               (invoke "pip" "--no-cache-dir" "--no-input"
+                       "install" "--no-deps" "--prefix" out whl)))))))
+    (native-inputs
+         (list python-poetry-core
+               python-pypa-build
+               python-toml))
+    (inputs (list python-bottle))
+    (home-page "https://blitiri.com.ar/p/git-arr//")
+    (synopsis "Static git repository browser")
+    (description
+"@code{git-arr} is a git repository browser that can generate static
+HTML instead of having to run dynamically.")
+    (license license:expat)))
+