gnu: emacs-ledger-mode: Update to 4.0.0-0-11e85039.

* gnu/packages/finance.scm (emacs-ledger-mode): Update to 4.0.0-0-11e85039.
[arguments]: Convert to list of G-Expressions.  Use ‘search-input-file’ where
possible.  Drop trailing ‘#t’s.  While here, respect TESTS? in check phase.

Co-authored-by: Aleksandr Vityazev <avityazev@posteo.org>
Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
This commit is contained in:
Aleksandr Vityazev 2022-05-16 11:04:14 +00:00 committed by Maxim Cournoyer
parent 5fc5cc2f73
commit 5a2b9fc2e6
No known key found for this signature in database
GPG Key ID: 1260E46482E63562

View File

@ -26,6 +26,8 @@
;;; Copyright © 2021 François J <francois-oss@avalenn.eu>
;;; Copyright © 2021 Foo Chuan Wei <chuanwei.foo@hotmail.com>
;;; Copyright © 2021 John Kehayias <john.kehayias@protonmail.com>
;;; Copyright © 2022 Kyle Meyer <kyle@kyleam.com>
;;; Copyright © 2022 Aleksandr Vityazev <avityazev@posteo.org>
;;;
;;; This file is part of GNU Guix.
;;;
@ -395,51 +397,53 @@ in ability, and easy to use.")
"See src/wcwidth.cc in the distribution.")))))
(define-public emacs-ledger-mode
(package
(name "emacs-ledger-mode")
(version "4.0.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/ledger/ledger-mode")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1r5rcyxd6d1rqwamzpvqdbkbdf1zbj75aaciqijrklnm59ps244y"))))
(build-system emacs-build-system)
(arguments
`(;; ledger-test.el is needed at runtime (but probably not for a good reason).
#:exclude '()
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'patch-path
(lambda* (#:key inputs #:allow-other-keys)
(let ((ledger (assoc-ref inputs "ledger")))
(make-file-writable "ledger-exec.el")
(emacs-substitute-variables "ledger-exec.el"
("ledger-binary-path" (string-append ledger "/bin/ledger"))))
#t))
(add-after 'build 'build-doc
(lambda* (#:key outputs #:allow-other-keys)
(let ((target (string-append (assoc-ref outputs "out")
"/share/info")))
(mkdir-p target)
(invoke "makeinfo" "-o" target
"../source/doc/ledger-mode.texi"))
#t))
(replace 'check
(lambda _
(with-directory-excursion "../source/test"
(invoke "make" "test-batch")))))))
(inputs
(list ledger))
(native-inputs
(list texinfo))
(home-page "https://ledger-cli.org/")
(synopsis "Command-line double-entry accounting program")
(description
"Ledger is a powerful, double-entry accounting system that is
;; The last release was on Nov 8, 2019 and doesn't build with Emacs 28.
(let ((commit "11e850395448ee7012dba16bd6df103f5552ebfb")
(revision "0"))
(package
(name "emacs-ledger-mode")
(version (git-version "4.0.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/ledger/ledger-mode")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "0hzky36vrlb7kvpyz4gy3zn01zdlmlx0s58w6ggk5djbcvjc2rfx"))))
(build-system emacs-build-system)
(arguments
(list
;; ledger-test.el is needed at runtime (but probably not for a good reason).
#:exclude #~'()
#:tests? #t
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'patch-path
(lambda* (#:key inputs #:allow-other-keys)
(make-file-writable "ledger-exec.el")
(emacs-substitute-variables "ledger-exec.el"
("ledger-binary-path" (search-input-file inputs "/bin/ledger")))))
(add-after 'build 'build-doc
(lambda _
(let ((target (string-append #$output "/share/info")))
(mkdir-p target)
(invoke "makeinfo" "-o" target
"../source/doc/ledger-mode.texi"))))
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(with-directory-excursion "../source/test"
(invoke "make" "test-batch"))))))))
(inputs
(list ledger))
(native-inputs
(list texinfo))
(home-page "https://ledger-cli.org/")
(synopsis "Command-line double-entry accounting program")
(description
"Ledger is a powerful, double-entry accounting system that is
accessed from the UNIX command-line. This may put off some users, since
there is no flashy UI, but for those who want unparalleled reporting
access to their data there are few alternatives.
@ -453,7 +457,7 @@ a graph or html instead. Ledger is simple in concept, surprisingly rich
in ability, and easy to use.
This package provides the Emacs mode.")
(license license:gpl2+)))
(license license:gpl2+))))
(define-public geierlein
(package