Compare commits

..

No commits in common. "f422a7b82eea70d7af137f3c518ee267bd4626fb" and "96c07bbdd542fb0559de86a94c9d13c839fe5868" have entirely different histories.

6 changed files with 40 additions and 99 deletions

1
.gitignore vendored
View File

@ -1,2 +1 @@
current current
*~

View File

@ -7,15 +7,6 @@
"9edb3f66fd807b096b48283debdcddccfea34bad" "9edb3f66fd807b096b48283debdcddccfea34bad"
(openpgp-fingerprint (openpgp-fingerprint
"BBB0 2DDF 2CEA F6A8 0D1D E643 A2A0 6DF2 A33A 54FA")))) "BBB0 2DDF 2CEA F6A8 0D1D E643 A2A0 6DF2 A33A 54FA"))))
(channel
(name 'artoria)
(url "https://git.bloodyno.se/lynn/artoria.git")
(branch "main")
(introduction
(make-channel-introduction
"56579fce18ab54c21442a98d923bd2bc6844d321"
(openpgp-fingerprint
"FE30 E8F6 522D 0615 35E0 E449 55E7 97F6 31DD A03C"))))
(channel (channel
(name 'nonguix) (name 'nonguix)
(url "https://gitlab.com/nonguix/nonguix") (url "https://gitlab.com/nonguix/nonguix")
@ -26,7 +17,7 @@
(openpgp-fingerprint (openpgp-fingerprint
"2A39 3FFF 68F4 EF7A 3D29 12AF 6F51 20A0 22FB B2D5")))) "2A39 3FFF 68F4 EF7A 3D29 12AF 6F51 20A0 22FB B2D5"))))
(channel (channel
(name 'michal_atlas) (name 'michael_atlas)
(url "https://git.sr.ht/~michal_atlas/guix-channel") (url "https://git.sr.ht/~michal_atlas/guix-channel")
(branch "master") (branch "master")
;;(introduction ;;(introduction
@ -35,5 +26,4 @@
;; (openpgp-fingerprint ;; (openpgp-fingerprint
;; "") ;; "")
;; )) ;; ))
) ))
)

View File

@ -1,2 +0,0 @@
[/]
idle-delay=uint32 0

View File

@ -25,10 +25,7 @@
(define (file-fetch url hash) (define (file-fetch url hash)
(with-store store (with-store store
(run-with-store store (run-with-store store
(url-fetch url 'sha256 (url-fetch url 'sha256 (base64-decode hash)))))
; hash
(base64-decode hash)
))))
(home-environment (home-environment
;; Below is the list of packages that will show up in your ;; Below is the list of packages that will show up in your
@ -48,8 +45,7 @@
`( `(
(".face" ,(file-fetch (".face" ,(file-fetch
"https://marq42.xyz/mir-avatar-picrew-3.png" "https://marq42.xyz/mir-avatar-picrew-3.png"
;; get below with `guix download URL --format=base64` - this took ages to work out "cf5ck8db4d5n24drdnv77wx1liiqi6an"
"Psx4J7+7mMKqpsT/rl/Iv/XQnZlTJ1WSMpswuNDjv38="
)))) ))))
(service home-dconf-load-service-type (service home-dconf-load-service-type
#~`((org/gnome/shell #~`((org/gnome/shell

View File

@ -11,8 +11,7 @@
;; used in this configuration. ;; used in this configuration.
(use-modules (use-modules
(gnu) (gnu)
(nongnu packages linux) (nongnu packages linux))
(nongnu system linux-initrd))
(use-service-modules (use-service-modules
cups cups
desktop desktop
@ -22,14 +21,12 @@
(operating-system (operating-system
(kernel linux) (kernel linux)
(initrd microcode-initrd)
(firmware (list linux-firmware)) (firmware (list linux-firmware))
(locale "en_US.utf8") (locale "en_US.utf8")
(timezone "America/Anchorage") (timezone "America/Anchorage")
(keyboard-layout (keyboard-layout "us")) (keyboard-layout (keyboard-layout "us"))
(host-name "starscream") (host-name "starscream")
;; The list of user accounts ('root' is implicit). ;; The list of user accounts ('root' is implicit).
(users (cons* (user-account (users (cons* (user-account
(name "mir") (name "mir")
@ -47,76 +44,44 @@
(specification->package "emacs") (specification->package "emacs")
(specification->package "eza") (specification->package "eza")
(specification->package "git") (specification->package "git")
(specification->package "gparted")
(specification->package "firefox")
;; (specification->package "nss-certs") ;removed because version conflict ;; (specification->package "nss-certs") ;removed because version conflict
) )
%base-packages)) %base-packages))
;; Below is the list of system services. To search for available ;; Below is the list of system services. To search for available
;; services, run 'guix system search KEYWORD' in a terminal. ;; services, run 'guix system search KEYWORD' in a terminal.
(services (services
(append (append (list (service gnome-desktop-service-type)
(modify-services %desktop-services
(guix-service-type
config => (guix-configuration
(inherit config)
(authorized-keys
(append (list
(local-file "./unikey.txt"))
%default-authorized-guix-keys))
(build-machines (list
#~(build-machine
(name "192.168.1.3") ; unicron
(systems (list "x86_64-linux" "1686-linux"))
(host-key "ssh-ed25519 AAAAC3NzaC1lZDI1NTE5AAAAIALuQ9g+xYE7Wu5o+8GjtJXLEfOaJwgURMVaJIDb0e8T")
(user "root")
(speed 2.) ; incredibly fast :3
))
)
)))
(list (service gnome-desktop-service-type)
;; To configure OpenSSH, pass an 'openssh-configuration' ;; To configure OpenSSH, pass an 'openssh-configuration'
;; record as a second argument to 'service' below. ;; record as a second argument to 'service' below.
(service openssh-service-type) (service openssh-service-type)
(service cups-service-type) (service cups-service-type)
(set-xorg-configuration (set-xorg-configuration
(xorg-configuration (keyboard-layout keyboard-layout))) (xorg-configuration (keyboard-layout keyboard-layout))))
)
;; This is the default list of services we ;; This is the default list of services we
;; are appending to. ;; are appending to.
;%desktop-services ; already modified above? %desktop-services))
))
(bootloader (bootloader-configuration (bootloader (bootloader-configuration
(bootloader grub-efi-bootloader) (bootloader grub-efi-bootloader)
(targets (list "/boot/efi")) (targets (list "/boot/efi"))
(keyboard-layout keyboard-layout))) (keyboard-layout keyboard-layout)))
(swap-devices (list (swap-space (swap-devices (list (swap-space
(target (target (uuid
; (uuid "dc1220de-fbc4-4008-86d1-5c9b152cc32c")))))
; "dc1220de-fbc4-4008-86d1-5c9b152cc32c")
(file-system-label "swap")
))))
;; The list of file systems that get "mounted". The unique ;; The list of file systems that get "mounted". The unique
;; file system identifiers there ("UUIDs") can be obtained ;; file system identifiers there ("UUIDs") can be obtained
;; by running 'blkid' in a terminal. ;; by running 'blkid' in a terminal.
(file-systems (cons* (file-system (file-systems (cons* (file-system
(mount-point "/boot/efi") (mount-point "/boot/efi")
(device (uuid ;"67E3-17ED" (device (uuid "67E3-17ED"
"FBB5-2030"
'fat32)) 'fat32))
(type "vfat")) (type "vfat"))
(file-system (file-system
(mount-point "/") (mount-point "/")
(device (device (uuid
(file-system-label "guix-root") "39ec24ba-7c1f-49ff-9af6-57ace91cfba5"
;(uuid 'ext4))
; "25b6c953-f92e-47df-baf0-6a80bccba45f"
; 'ext4)
)
(type "ext4")) %base-file-systems))) (type "ext4")) %base-file-systems)))

View File

@ -1,7 +0,0 @@
(public-key
(ecc
(curve Ed25519)
(q #E175C2683B75DE142F39AA7EA7CEDF1E939A80F44DBDC35479BFA81EB541F125#)
)
)