me
/
guix
Archived
1
0
Fork 0

gnu: emacs-dvc: Use new style.

* gnu/packages/emacs-xyz.scm (emacs-dvc)[arguments]<#:configure-flags>: Use
gexps.
<#:phases>: Remove trailing #T.
[native-inputs]: Remove labels.
[synopsis]: Remove trailing dot.
master
Nicolas Goaziou 2021-12-14 19:59:41 +01:00
parent 64ed2d8414
commit b484301f52
No known key found for this signature in database
GPG Key ID: DA00B4F048E92F2D
1 changed files with 26 additions and 34 deletions

View File

@ -127,6 +127,7 @@
#:use-module (guix cvs-download)
#:use-module (guix download)
#:use-module (guix bzr-download)
#:use-module (guix gexp)
#:use-module (guix git-download)
#:use-module (guix hg-download)
#:use-module (guix build-system gnu)
@ -5816,49 +5817,40 @@ completion of relevant keywords.")
(url "lp:dvc")
(revision revision)))
(sha256
(base32
"03pqn493w70wcpgaxvqnfgynxghw114l9pyiv3r414d84vzhan6h"))
(base32 "03pqn493w70wcpgaxvqnfgynxghw114l9pyiv3r414d84vzhan6h"))
(file-name (string-append name "-" version "-checkout"))))
(build-system gnu-build-system)
(arguments
`(#:modules ((guix build gnu-build-system)
(list
#:modules `((guix build gnu-build-system)
((guix build emacs-build-system) #:prefix emacs:)
(guix build utils))
#:imported-modules (,@%gnu-build-system-modules
#:imported-modules `(,@%gnu-build-system-modules
(guix build emacs-build-system)
(guix build emacs-utils))
#:configure-flags
(list (string-append "--with-lispdir="
(emacs:elpa-directory (assoc-ref %outputs "out"))))
#~(list (string-append "--with-lispdir="
(emacs:elpa-directory #$output)))
#:tests? #f ;no test suite
#:phases
(modify-phases %standard-phases
#~(modify-phases %standard-phases
(add-before 'build 'set-home
;; Something in dvc-bookmarks.el attempts to write config files in
;; $HOME during the autoload generation.
(lambda _ (setenv "HOME" (getenv "TMPDIR")) #t))
;; Something in dvc-bookmarks.el attempts to write config files
;; in $HOME during the autoload generation.
(lambda _ (setenv "HOME" (getenv "TMPDIR"))))
(add-before 'build 'fix-texinfo
;; See https://bugs.launchpad.net/dvc/+bug/1264383.
(lambda _
(substitute* "texinfo/dvc-intro.texinfo"
(("@itemx update ``to''")
"@item update ``to''")
(("@itemx brief")
"@item brief")
(("@itemx full")
"@item full")
(("@itemx drop")
"@item drop")
(("@itemx left file")
"@item left file"))
#t)))))
(("@itemx update ``to''") "@item update ``to''")
(("@itemx brief") "@item brief")
(("@itemx full") "@item full")
(("@itemx drop") "@item drop")
(("@itemx left file") "@item left file")))))))
(native-inputs
`(("autoconf" ,autoconf)
("automake" ,automake) ;for aclocal
("emacs" ,emacs-minimal)
("texinfo" ,texinfo)))
(list autoconf automake emacs-minimal texinfo))
(home-page "http://xsteve.at/prg/emacs_dvc/index.html")
(synopsis "Emacs front-end for various distributed version control systems.")
(synopsis "Emacs front-end for various distributed version control systems")
(description "DVC is a legacy Emacs front-end for a number of
distributed version control systems. It currently supports GNU Arch, GNU
Bazaar, git, Mercurial, and Monotone. It also provides some integration with