mapcar → dolist

We do not need mapcar here; dolist is cleaner

global.org

@@ -81,15 +81,13 @@
    #+begin_src emacs-lisp
      (defun global-set-key-alist (binding-alist)
        "This function iterates over the binding-alist, which should be an alist of key and binding and sets each binding in the global-key-map"
-       (mapcar
-        (lambda (binding)
-          (global-set-key (kbd (car binding)) (cdr binding))) binding-alist))
+       (dolist (binding binding-alist)
+         (global-set-key (kbd (car binding)) (cdr binding))))
 
      (defun define-key-alist (keymap binding-alist)
        "This function iterates over the binding-alist, which should be an alist of key and binding and sets each binding in the global-key-map"
-       (mapcar
-        (lambda (binding)
-          (define-key keymap (kbd (car binding)) (cdr binding))) binding-alist))
+       (dolist (binding binding-alist)
+         (define-key keymap (kbd (car binding)) (cdr binding))))
    #+end_src
    This is a hack to remove slant and bold from all faces
    #+begin_src emacs-lisp