 	))
 	(defconst nixos-sys-packages
 		'("/run/current-system/sw/share/emacs/site-lisp"))
-		(mapcar
-			'(lambda(p)
+		(mapc
+			#'(lambda(p)
 			(add-to-list 'load-path p)
 			(cd p)
 			(normal-top-level-add-subdirs-to-load-path)


; Install packages if they are missing.
(defun my/packages-installed-p ()
	(loop for pkg in my/packages
		when (not (package-installed-p pkg)) do (return nil)
		finally (return t)))


(require 'cl-lib)

; Make paragraph-filling put 1 space after a period (full stop), not 2 spaces.
(setq sentence-end-double-space nil)
