blob: 6518cd2c9de7414ee828632de27020be7f10aa42 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
|
;;; Copyright © 2015, 2016, 2017 David Thompson <davet@gnu.org>
;;;
;;; This program 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.
;;;
;;; This program 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 this program. If not, see
;;; <http://www.gnu.org/licenses/>.
;;; Commentary:
;;
;; Thinkpad X220 configuration.
(use-modules (gnu)
(gnu system nss)
(gnu system linux-initrd)
(guix packages)
(ice-9 match)
(srfi srfi-1))
(use-service-modules desktop)
(use-package-modules admin certs compression glib gnome man less ncurses
pulseaudio rsync ssh wicd xorg)
(operating-system
(host-name "izanagi")
(timezone "America/New_York")
(locale "en_US.UTF-8")
(bootloader (grub-configuration (target "/dev/sda")))
(file-systems (cons (file-system
(device "root")
(title 'label)
(mount-point "/")
(type "ext4"))
%base-file-systems))
(users (list (user-account
(name "dave")
(comment "David Thompson")
(group "users")
(supplementary-groups '("wheel" "netdev" "audio"
"video" "cdrom" "kvm"
"input" "dialout"))
(home-directory "/home/dave"))))
(packages (cons* adwaita-icon-theme
arc-theme
arc-icon-theme
htop less man-db ncurses nss-certs
openssh unzip rsync
gnome-shell-extensions
gnome-tweak-tool
%base-packages))
(services (cons* (gnome-desktop-service)
(modify-services %desktop-services
(guix-service-type
config => (guix-configuration
(inherit config)
(substitute-urls
(list "https://berlin.guixsd.org"
"https://mirror.hydra.gnu.org"
"https://hydra.gnu.org")))))))
(name-service-switch %mdns-host-lookup-nss))
|
