Emacs configuration: reformat according to pretty-print principle

1 files changed, 34 insertions, 19 deletions

diff --git a/emacs.el b/emacs.el
index f152a86..625d4b2 100644
--- a/emacs.el
+++ b/emacs.el
@@ -1,16 +1,16 @@
 ;;; Enable MELPA repository
 (require 'package)
-(add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
+(add-to-list 'package-archives
+	     '("melpa" . "https://melpa.org/packages/")
+	     t)
 (package-initialize)
 
 ;;; https://github.com/fimblo/dot.emacs
 ;;; Theme Activation
-
 (load-theme 'manoj-dark)
 
 ;;; https://elpa.gnu.org/packages/aggressive-indent.html
 ;;; Automatic Activation of Aggressive Indent
-
 (global-aggressive-indent-mode 1)
 
 ;;; https://jeko.frama.io/en/emacs.html
@@ -21,20 +21,28 @@
 
 ;; Highlight the pair of delimiters under the cursor
 (show-paren-mode 1)
-(setq show-paren-delay 0)
+(setq show-paren-delay
+      0)
 
 ;; Add Geiser and its auto-completion
 (ac-config-default)
 (require 'ac-geiser)
-(add-hook 'geiser-mode-hook 'ac-geiser-setup)
-(add-hook 'geiser-repl-mode-hook 'ac-geiser-setup)
+(add-hook 'geiser-mode-hook
+	  'ac-geiser-setup)
+(add-hook 'geiser-repl-mode-hook
+	  'ac-geiser-setup)
 (eval-after-load "auto-complete"
-  '(add-to-list 'ac-modes 'geiser-repl-mode))
+  '(add-to-list 'ac-modes
+		'geiser-repl-mode))
 
 ;; Edit the code based on the S-expression structure
 (require 'paredit)
-(autoload 'enable-paredit-mode "paredit" "Turn on pseudo-structural editing of Lisp code." t)
-(add-hook 'scheme-mode-hook #'enable-paredit-mode)
+(autoload 'enable-paredit-mode
+  "paredit"
+  "Turn on pseudo-structural editing of Lisp code."
+  t)
+(add-hook 'scheme-mode-hook
+	  #'enable-paredit-mode)
 
 ;; Edit several strings of characters in the same way simultaneously
 (require 'iedit)
@@ -55,18 +63,25 @@
     (progn (package-refresh-contents)
 	   (package-install 'emr)))
 (require 'emr)
-(autoload 'emr-show-refactor-menu "emr")
-(define-key prog-mode-map (kbd "M-RET") 'emr-show-refactor-menu)
-(eval-after-load "emr" '(emr-initialize))
-(global-set-key (kbd "M-v") 'emr-scm-extract-variable)
-(global-set-key (kbd "M-f") 'emr-scm-extract-function)
+(autoload 'emr-show-refactor-menu
+  "emr")
+(define-key prog-mode-map
+  (kbd "M-RET")
+  'emr-show-refactor-menu)
+(eval-after-load "emr"
+  '(emr-initialize))
+(global-set-key (kbd "M-v")
+		'emr-scm-extract-variable)
+(global-set-key (kbd "M-f")
+		'emr-scm-extract-function)
 
 ;;; https://guix.gnu.org/manual/en/html_node/The-Perfect-Setup.html
 ;;; Copyright Information
-
-(setq user-full-name "Marek Paśnikowski")
-(setq user-mail-address "marekpasnikowski@protonmail.com")
+(setq user-full-name
+      "Marek Paśnikowski")
+(setq user-mail-address
+      "marekpasnikowski@protonmail.com")
 
 ;;; Startup Screen Inhibition
-
-(setq inhibit-startup-screen t)
+(setq inhibit-startup-screen
+      t)