gnu: Use emacs-no-x when we just want to byte-compile code.

* gnu/packages/code.scm (cflow)[native-inputs]: Change EMACS to
  EMACS-NO-X.
* gnu/packages/databases.scm (recutils): Likewise.
* gnu/packages/emacs.scm (geiser, paredit, magit, emacs-w3m, emacs-wget,
  emms, bbdb): Likewise.
* gnu/packages/idutils.scm (idutils): Likewise.
* gnu/packages/mail.scm (mu): Likewise.
* gnu/packages/package-management.scm (guix-0.8.1): Likewise.
* gnu/packages/scheme.scm (bigloo): Likewise.
* gnu/packages/version-control.scm (vc-dwim): Likewise.
This commit is contained in:
Ludovic Courtès 2015-03-19 23:08:46 +01:00
parent 4fd540b7f0
commit 2d32d153a7
8 changed files with 16 additions and 16 deletions

View file

@ -45,7 +45,7 @@ (define-public cflow
(build-system gnu-build-system)
;; Needed to have cflow-mode.el installed.
(native-inputs `(("emacs" ,emacs)))
(native-inputs `(("emacs" ,emacs-no-x)))
(home-page "http://www.gnu.org/software/cflow/")
(synopsis "Create a graph of control flow within a program")

View file

@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2012, 2013, 2014 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2012, 2013, 2014, 2015 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2012, 2014 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2013 Cyril Roelandt <tipecaml@gmail.com>
;;; Copyright © 2014 David Thompson <davet@gnu.org>
@ -192,7 +192,7 @@ (define-public recutils
;; torture/utils.
(arguments '(#:parallel-tests? #f))
(native-inputs `(("emacs" ,emacs)
(native-inputs `(("emacs" ,emacs-no-x)
("bc" ,bc)))
;; TODO: Add more optional inputs.

View file

@ -169,7 +169,7 @@ (define-public geiser
"geiser-autoloads.el")))
%standard-phases)))
(inputs `(("guile" ,guile-2.0)
("emacs" ,emacs)))
("emacs" ,emacs-no-x)))
(home-page "http://nongnu.org/geiser/")
(synopsis "Collection of Emacs modes for Guile and Racket hacking")
(description
@ -200,7 +200,7 @@ (define-public paredit
(sha256
(base32 "1np882jzvxckljx3cjz4absyzmc5hw65cs21sjmbic82163m9lf8"))))
(build-system trivial-build-system)
(inputs `(("emacs" ,emacs)))
(inputs `(("emacs" ,emacs-no-x)))
(arguments
`(#:modules ((guix build utils)
(guix build emacs-utils))
@ -247,7 +247,7 @@ (define-public magit
(base32 "1in48g5l5xdc9cf2apnpgx73mqlz2njrpi1w52dgql4qxv3kg6gr"))))
(build-system gnu-build-system)
(native-inputs `(("texinfo" ,texinfo)))
(inputs `(("emacs" ,emacs)
(inputs `(("emacs" ,emacs-no-x)
("git" ,git)
("git:gui" ,git "gui")))
(arguments
@ -310,7 +310,7 @@ (define-public emacs-w3m
(native-inputs `(("autoconf" ,autoconf)))
(inputs `(("w3m" ,w3m)
("imagemagick" ,imagemagick)
("emacs" ,emacs)))
("emacs" ,emacs-no-x)))
(arguments
'(#:modules ((guix build gnu-build-system)
(guix build utils)
@ -378,7 +378,7 @@ (define-public emacs-wget
(base32 "10byvyv9dk0ib55gfqm7bcpxmx2qbih1jd03gmihrppr2mn52nff"))))
(build-system gnu-build-system)
(inputs `(("wget" ,wget)
("emacs" ,emacs)))
("emacs" ,emacs-no-x)))
(arguments
'(#:modules ((guix build gnu-build-system)
(guix build utils)
@ -519,7 +519,7 @@ (define-public emms
(chmod target #o555)))
%standard-phases)))
#:tests? #f))
(native-inputs `(("emacs" ,emacs) ;for (guix build emacs-utils)
(native-inputs `(("emacs" ,emacs-no-x) ;for (guix build emacs-utils)
("texinfo" ,texinfo)))
(inputs `(("alsa-utils" ,alsa-utils)
("vorbis-tools" ,vorbis-tools)
@ -569,7 +569,7 @@ (define-public bbdb
(with-directory-excursion site
(symlink "bbdb-loaddefs.el" "bbdb-autoloads.el"))))
%standard-phases)))
(native-inputs `(("emacs" ,emacs)))
(native-inputs `(("emacs" ,emacs-no-x)))
(home-page "http://savannah.nongnu.org/projects/bbdb/")
(synopsis "Contact management utility for Emacs")
(description

View file

@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2012, 2013 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2012, 2013, 2015 Ludovic Courtès <ludo@gnu.org>
;;;
;;; This file is part of GNU Guix.
;;;
@ -38,7 +38,7 @@ (define-public idutils
(patches (list
(search-patch "diffutils-gets-undeclared.patch")))))
(build-system gnu-build-system)
(native-inputs `(("emacs" ,emacs)))
(native-inputs `(("emacs" ,emacs-no-x)))
(home-page "http://www.gnu.org/software/idutils/")
(synopsis "Identifier database utilities")
(description

View file

@ -329,7 +329,7 @@ (define-public mu
;; TODO: Add webkit and gtk to build the mug GUI.
(inputs
`(("xapian" ,xapian)
("emacs" ,emacs)
("emacs" ,emacs-no-x)
("guile" ,guile-2.0)
("glib" ,glib)
("gmime" ,gmime)

View file

@ -96,7 +96,7 @@ (define (copy arch)
#t)
%standard-phases)))
(native-inputs `(("pkg-config" ,pkg-config)
("emacs" ,emacs))) ;for guix.el
("emacs" ,emacs-no-x))) ;for guix.el
(inputs
(let ((boot-guile (lambda (arch hash)
(origin

View file

@ -199,7 +199,7 @@ (define-public bigloo
(string-append "EMACSDIR=" dir)))))
%standard-phases))))
(inputs
`(("emacs" ,emacs)
`(("emacs" ,emacs-no-x)
;; Optional APIs for which Bigloo has bindings.
("avahi" ,avahi)

View file

@ -619,7 +619,7 @@ (define-public vc-dwim
(build-system gnu-build-system)
(inputs `(("perl" ,perl)
("inetutils" ,inetutils) ; for `hostname', used in the tests
("emacs" ,emacs))) ; for `ctags'
("emacs" ,emacs-no-x))) ; for `ctags'
(home-page "http://www.gnu.org/software/vc-dwim/")
(synopsis "Version-control-agnostic ChangeLog diff and commit tool")
(description