From 5d3cf449c38198aa90277492103685f0f7bb4d38 Mon Sep 17 00:00:00 2001 From: Marek Paśnikowski Date: Sat, 13 Aug 2022 18:11:30 +0200 Subject: Tighter Parentheses --- emacs | 15 +++++++++++ home-configuration.scm | 68 +++++++++++++++++++++++++------------------------- 2 files changed, 49 insertions(+), 34 deletions(-) create mode 100644 emacs diff --git a/emacs b/emacs new file mode 100644 index 0000000..3887730 --- /dev/null +++ b/emacs @@ -0,0 +1,15 @@ +;; https://elpa.gnu.org/packages/aggressive-indent.html +;; Automatic Activation of Aggressive Indent + +(global-aggressive-indent-mode 1) + +;; https://www.emacswiki.org/emacs/ParEdit +;; Automatic Activation of ParEdit + +(autoload 'enable-paredit-mode "paredit" "Turn on pseudo-structural editing of Lisp code." t) +(add-hook 'emacs-lisp-mode-hook #'enable-paredit-mode) +(add-hook 'eval-expression-minibuffer-setup-hook #'enable-paredit-mode) +(add-hook 'ielm-mode-hook #'enable-paredit-mode) +(add-hook 'lisp-mode-hook #'enable-paredit-mode) +(add-hook 'lisp-interaction-mode-hook #'enable-paredit-mode) +(add-hook 'scheme-mode-hook #'enable-paredit-mode) \ No newline at end of file diff --git a/home-configuration.scm b/home-configuration.scm index c613830..7d4eeee 100644 --- a/home-configuration.scm +++ b/home-configuration.scm @@ -1,35 +1,35 @@ -( use-modules - ( gnu home ) - ( gnu home services ) - ( gnu home services shells ) - ( gnu packages ) - ( gnu services ) - ( guix gexp ) ) +(use-modules + (gnu home) + (gnu home services) + (gnu home services shells) + (gnu packages) + (gnu services) + (guix gexp)) -( home-environment - ( packages - ( map - ( compose list specification->package+output ) - ( list "cpupower" "dconf-editor" "emacs" "emacs-aggressive-indent" "emacs-company" "emacs-geiser" "emacs-geiser-guile" "emacs-paredit" "font-google-noto" "git" "git-lfs" "gnome-tweaks" "libreoffice" "pwgen" "seahorse" "trezor-agent" ) ) ) - ( services - ( list - ( service home-bash-service-type - ( home-bash-configuration - ( environment-variables - '(( "EDITOR" . "nano" ) - ( "NVM_DIR" . "$HOME/src/nvm" ) - ( "GUILE_AUTO_COMPILE" . "0" ) ) ) - ( aliases - '(( "grep" . "grep --color=auto" ) - ( "ll" . "ls -l" ) - ( "ls" . "ls -p --color=auto" ) ) ) - ( bash-profile - ( list - ( local-file "/home/marek/src/guix-config/.bash_profile" "bash_profile" ) ) ) - ( bashrc - ( list - ( local-file "/home/marek/src/guix-config/.bashrc" "bashrc" ) - ( local-file "/home/marek/src/guix-config/nvm_init" "nvm_init" ) ) ) ) ) - ( simple-service 'dot-emacs home-files-service-type - ( list - `( ".emacs" ,( local-file "emacs" ) ) ) ) ) ) ) +(home-environment + (packages + (map + (compose list specification->package+output) + (list "cpupower" "dconf-editor" "emacs" "emacs-aggressive-indent" "emacs-company" "emacs-geiser" "emacs-geiser-guile" "emacs-paredit" "font-google-noto" "git" "git-lfs" "gnome-tweaks" "libreoffice" "pwgen" "seahorse" "trezor-agent"))) + (services + (list + (service home-bash-service-type + (home-bash-configuration + (environment-variables + '(("EDITOR" . "nano") + ("NVM_DIR" . "$HOME/src/nvm") + ("GUILE_AUTO_COMPILE" . "0"))) + (aliases + '(("grep" . "grep --color=auto") + ("ll" . "ls -l") + ("ls" . "ls -p --color=auto"))) + (bash-profile + (list + (local-file "/home/marek/src/guix-config/.bash_profile" "bash_profile"))) + (bashrc + (list + (local-file "/home/marek/src/guix-config/.bashrc" "bashrc") + (local-file "/home/marek/src/guix-config/nvm_init" "nvm_init"))))) + (simple-service 'dot-emacs home-files-service-type + (list + `(".emacs" ,( local-file "emacs"))))))) -- cgit v1.2.3