;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2022 pukkamustard <pukkamustard@posteo.net>
;;;
;;; This file is 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 (gnu packages pikchr)
  #:use-module (guix packages)
  #:use-module (guix build-system gnu)
  #:use-module (guix download)
  #:use-module ((guix licenses) #:prefix license:))

(define-public pikchr
  (let ((commit "221988914eff6efe")
        (revision "0"))                       ;increment for each new snapshot
    (package
      (name "pikchr")
      ;; To update, use the last check-in in https://pikchr.org/home/timeline?r=trunk
      (version (string-append revision "-" (string-take commit 5)))
      (source (origin
                (method url-fetch)
                (uri (string-append "https://pikchr.org/home/tarball/" commit
                                    "/pikchr.tar.gz"))
                (file-name (string-append "pikchr-" version ".tar.gz"))
                (sha256
                 (base32
                  "0yclkincsgfni4scjzp5avdsij8vmyxjn0q2qkwjhn3p43y8nxzd"))))
      (build-system gnu-build-system)
      (arguments
       '(#:tests? #f                              ;no tests
         #:phases
         (modify-phases %standard-phases
           (delete 'bootstrap)
           (delete 'configure)
           (replace 'inst<pre>
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013, 2017-2022 Ludovic Courtès &lt;ludo@gnu.org&gt;
;;; Copyright © 2014 Ian Denhardt &lt;ian@zenhack.net&gt;
;;; Copyright © 2015, 2016 Alex Kost &lt;alezost@gmail.com&gt;
;;; Copyright © 2016-2021, 2023 Efraim Flashner &lt;efraim@flashner.co.il&gt;
;;; Copyright © 2017 Alex Griffin &lt;a@ajgrf.com&gt;
;;; Copyright © 2017 Nikita &lt;nikita@n0.is&gt;
;;; Copyright © 2017 Mathieu Othacehe &lt;m.othacehe@gmail.com&gt;
;;; Copyright © 2017 nee &lt;nee-git@hidamari.blue&gt;
;;; Copyright © 2018–2021 Tobias Geerinckx-Rice &lt;me@tobias.gr&gt;
;