From dd278fa4e3330884547db8713531efa6ee956e0b Mon Sep 17 00:00:00 2001 From: David Thompson Date: Sat, 12 Aug 2023 10:18:13 -0400 Subject: Reorganize! Delete cruft! Use guix home! --- aigis.scm | 64 --------------------------------------------------------------- 1 file changed, 64 deletions(-) delete mode 100644 aigis.scm (limited to 'aigis.scm') diff --git a/aigis.scm b/aigis.scm deleted file mode 100644 index 46bdb82..0000000 --- a/aigis.scm +++ /dev/null @@ -1,64 +0,0 @@ -;;; Copyright © 2015 David Thompson -;;; -;;; 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 -;;; . - -;;; Commentary: -;; -;; HTPC configuration. - -(use-modules (srfi srfi-1) - (gnu) - (gnu services)) -(use-service-modules desktop networking ssh xorg) -(use-package-modules certs kodi rsync) - -(define (wicd-service? service) - (eq? (service-kind service) wicd-service-type)) - -(operating-system - (host-name "aigis") - (timezone "America/New_York") - (locale "en_US.UTF-8") - (bootloader (grub-configuration (device "/dev/sda"))) - (file-systems (cons* (file-system - (device "root") - (title 'label) - (mount-point "/") - (type "ext4")) - (file-system - (device "home") - (title 'label) - (mount-point "/home") - (type "ext4")) - %base-file-systems)) - (users (list (user-account - (name "dave") - (comment "David Thompson") - (group "users") - (supplementary-groups '("wheel" "netdev" "audio" - "video" "cdrom")) - (home-directory "/home/dave")))) - (packages (cons* nss-certs rsync %base-packages)) - (services - (let ((kodi-session #~(string-append #$kodi "/bin/kodi-standalone"))) - (cons* (static-networking-service "enp0s10" "192.168.1.222") - (lsh-service #:initialize? #t) - (modify-services (remove wicd-service? %desktop-services) - (slim-service-type config => - (slim-configuration - (inherit config) - (auto-login? #t) - (default-user "dave") - (auto-login-session kodi-session)))))))) -- cgit v1.2.3