summaryrefslogtreecommitdiff
path: root/users/marekpasnikowski.scm
diff options
context:
space:
mode:
Diffstat (limited to 'users/marekpasnikowski.scm')
-rw-r--r--users/marekpasnikowski.scm71
1 files changed, 0 insertions, 71 deletions
diff --git a/users/marekpasnikowski.scm b/users/marekpasnikowski.scm
deleted file mode 100644
index e259d55..0000000
--- a/users/marekpasnikowski.scm
+++ /dev/null
@@ -1,71 +0,0 @@
-(define-module (users marekpasnikowski)
- #:use-module (gnu home) ; home-environment
- #:use-module (gnu home services) ; home-profile-service-type
- ; home-xdg-configuration-files-service-type
- #:use-module (gnu packages emacs) ; emacs
- #:use-module (gnu packages emacs-xyz) ; emacs-org-roam
- ; emacs-paredit
- #:use-module (gnu packages librewolf) ; librewolf
- #:use-module (gnu packages version-control) ; git
- #:use-module (gnu services) ; service
- ; simple-service
- #:use-module (gnu system shadow) ; user-account
- #:use-module (guix gexp) ; file-append
- #:use-module (suweren home) ; %suweren-home-services
- )
-
-;; string
-(define-public marekpasnikowski-username
- "marek")
-
-;; (string) ->
-;; record user-account
-(define-public (marekpasnikowski-account supplementary-groups*)
- (user-account (name marekpasnikowski-username)
- (group "users")
- (supplementary-groups supplementary-groups*)
- (uid 1000)
- (comment "Marek Paśnikowski")
- (home-directory "/home/marek")))
-
-;; string
-(define-public user
- "marek")
-
-;; record home-environment
-(define-public marekpasnikowski-home-environment
- (lambda (host-name*)
- (let* ((gitconfig-file (local-file "marekpasnikowski-gitconfig")) ; TODO modularize
- (gitignore-file (local-file "marekpasnikowski-gitignore")) ; TODO review the contents
-
- (gitconfig (list "git/config"
- gitconfig-file))
- (gitignore (list "git/ignore"
- gitignore-file))
-
- (emacs-packages (list emacs
- emacs-org-roam
- emacs-paredit))
- (git-configuration-files (list gitconfig
- gitignore))
- (git-packages (list git))
-
- (emacs-software (simple-service 'emacs-packages
- home-profile-service-type
- emacs-packages))
- (git-configuration (simple-service 'git-configuration
- home-xdg-configuration-files-service-type
- git-configuration-files))
- (git-software (simple-service 'git-packages
- home-profile-service-type
- git-packages))
-
- (%suweren-home-services* (%suweren-home-services host-name*))
- (user-services (list ;; emacs-configuration
- emacs-software
- git-configuration
- git-software))
-
- (services* (append %suweren-home-services*
- user-services)))
- (home-environment (services services*)))))