Tighter Parentheses

2 files changed, 49 insertions, 34 deletions

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")))))))