summaryrefslogtreecommitdiff
path: root/gnu/services/base.scm
diff options
context:
space:
mode:
authorMark H Weaver <mhw@netris.org>2015-07-19 18:12:34 -0400
committerMark H Weaver <mhw@netris.org>2015-07-19 18:12:34 -0400
commit1b4e48d498a96d478baa1aae7d9c7ecdbd817d6f (patch)
tree4b650999e49a6f4d3dd116fab3f9ee8222247e07 /gnu/services/base.scm
parentaa27987f71cb8afa698ede551e20b1248f160113 (diff)
parent50c7a1e297bff0935674b4f30e854a8889becfdd (diff)
downloadpatches-1b4e48d498a96d478baa1aae7d9c7ecdbd817d6f.tar
patches-1b4e48d498a96d478baa1aae7d9c7ecdbd817d6f.tar.gz
Merge branch 'master' into core-updates
Diffstat (limited to 'gnu/services/base.scm')
-rw-r--r--gnu/services/base.scm12
1 files changed, 6 insertions, 6 deletions
diff --git a/gnu/services/base.scm b/gnu/services/base.scm
index d5744204d9..888e446dc0 100644
--- a/gnu/services/base.scm
+++ b/gnu/services/base.scm
@@ -25,7 +25,7 @@
#:use-module (gnu system linux) ; 'pam-service', etc.
#:use-module (gnu packages admin)
#:use-module ((gnu packages linux)
- #:select (eudev kbd e2fsprogs lvm2 fuse alsa-utils))
+ #:select (eudev kbd e2fsprogs lvm2 fuse alsa-utils crda))
#:use-module ((gnu packages base)
#:select (canonical-package glibc))
#:use-module (gnu packages package-management)
@@ -739,11 +739,11 @@ item of @var{packages}."
(call-with-output-file
(string-append rules.d "/90-kvm.rules")
(lambda (port)
- ;; FIXME: As a workaround for
- ;; <http://bugs.gnu.org/18994>, make /dev/kvm 666
- ;; instead of 660.
+ ;; Build users are part of the "kvm" group, so we
+ ;; can fearlessly make /dev/kvm 660 (see
+ ;; <http://bugs.gnu.org/18994>, for background.)
(display "\
-KERNEL==\"kvm\", GROUP=\"kvm\", MODE=\"0666\"\n" port))))
+KERNEL==\"kvm\", GROUP=\"kvm\", MODE=\"0660\"\n" port))))
#:modules '((guix build utils))))
(define* (udev-service #:key (udev eudev) (rules '()))
@@ -884,6 +884,6 @@ This is the GNU operating system, welcome!\n\n")))
;; The LVM2 rules are needed as soon as LVM2 or the device-mapper is
;; used, so enable them by default. The FUSE and ALSA rules are
;; less critical, but handy.
- (udev-service #:rules (list lvm2 fuse alsa-utils)))))
+ (udev-service #:rules (list lvm2 fuse alsa-utils crda)))))
;;; base.scm ends here