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

(require 'cl)

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


; MELPA
(require 'package)
(eval-and-compile
	(package-initialize)
)
(add-to-list 'package-archives
'("melpa" . "http://melpa.milkbox.net/packages/") t)

; Define packages that we'll be using.
(defvar my/packages
