(defun dotfiles/org-babel-tangle-config ()
  (when (string-equal (buffer-file-name)
		      (expand-file-name "~/dotfiles/guix/init.org"))
    (let ((org-confirm-babel-evaluate nil))
      (org-babel-tangle))))