     (load dotspacemacs-filepath)
     (dotspacemacs/layers)
     (spacemacs//test-list
-     'stringp 'dotspacemacs-configuration-layer-path "is a string" "path")
+     'stringp 'dotspacemacs-configuration-layer-path
+     "is a string" "path")
     (spacemacs//test-list
-     'file-directory-p 'dotspacemacs-configuration-layer-path "exists in filesystem" "path")
+     'file-directory-p 'dotspacemacs-configuration-layer-path
+     "exists in filesystem" "path")
     (setq dotspacemacs-configuration-layers
-          (mapcar (lambda (l) (if (listp l) (car l) l)) dotspacemacs-configuration-layers))
+          (mapcar (lambda (l) (if (listp l) (car l) l))
+                  dotspacemacs-configuration-layers))
     (spacemacs//test-list
      'configuration-layer/get-layer-path
      'dotspacemacs-configuration-layers  "can be found" "layer")
     (insert (format
-             "** RESULTS: [[file:%s::dotspacemacs/layers][dotspacemacs/layers]] passed %s out of %s tests\n"
+             (concat "** RESULTS: "
+                     "[[file:%s::dotspacemacs/layers][dotspacemacs/layers]] "
+                     "passed %s out of %s tests\n")
              dotspacemacs-filepath passed-tests total-tests))
     (equal passed-tests total-tests)))
 
 (defun dotspacemacs//test-dotspacemacs/init ()
   "Tests for `dotspacemacs/init'"
   (insert
-   (format "\n* Testing settings in dotspacemacs/init [[file:%s::dotspacemacs/init][Show in File]]\n"
+   (format (concat "\n* Testing settings in dotspacemacs/init "
+                   "[[file:%s::dotspacemacs/init][Show in File]]\n")
            dotspacemacs-filepath))
   ;; protect global values of these variables
   (let (dotspacemacs-editing-style dotspacemacs-verbose-loading

              (setq spacemacs-loading-string "")
              (save-buffer)
              (load-file buffer-file-name)
              (dotspacemacs|call-func dotspacemacs/init "Calling dotfile init...")
              (configuration-layer/sync)
              (if arg
                  (message "Done (`dotspacemacs/config' function has been skipped).")
                (dotspacemacs|call-func dotspacemacs/config
                                        "Calling dotfile config...")
                (message "Done."))

         (when arg
           ;; editing style
           `(("dotspacemacs-editing-style 'vim"
              ,(format
                "dotspacemacs-editing-style '%S"
                (dotspacemacs//ido-completing-read
                 "What is your preferred style? "
                 '(("Among the stars aboard the Evil flagship (vim)"
                    vim)
                   ("On the planet Emacs in the Holy control tower (emacs)"
                    emacs)))))))))
    (with-current-buffer (find-file-noselect
                       (concat dotspacemacs-template-directory
                               ".spacemacs.template"))
