melpa-bootstrap.el

(require 'package)

;; Add MELPA before initialization
(add-to-list
 'package-archives
 '("melpa" . "http://melpa.org/packages/") t)

(package-initialize)

;; Bootstrap `use-package'
(unless (require 'use-package nil t)
  (package-refresh-contents)
  (package-install 'use-package))

simple-setup.el

(with-current-buffer (find-file user-init-file)
  (insert "
(require 'package)

;; Add MELPA before initialization
(add-to-list
 'package-archives
 '(\"melpa\" . \"http://melpa.org/packages/\") t)

(package-initialize)

;; Bootstrap `use-package'
(unless (require 'use-package nil t)
  (package-refresh-contents)
  (package-install 'use-package))

(use-package smex
  :ensure t
  :config
  (smex-initialize)
  :bind ((\"M-x\" . smex)
         (\"C-c M-x\" . smex-major-mode-commands)))

(use-package helm-config
  :ensure helm

  :config
  (helm-mode 1)

  :config
  (use-package helm-swoop
    :ensure t
    :bind (\"C-S-s\" . helm-swoop)
    :commands (helm-swoop helm-swoop-from-isearch)
    :config
    (progn
      (bind-key \"C-s\" #'helm-swoop helm-command-prefix)
      (bind-key \"M-i\" #'helm-swoop-from-isearch isearch-mode-map)))

  :config
  (setq helm-M-x-fuzzy-match t)

  :bind ((\"s-x\"   . helm-M-x)
         (\"C-c g\" . helm-google-suggest)
         (\"C-x b\" . helm-mini)
         ;; use `ag' for recursive grep?  is it possible?
         ;; (\"C-x C-f\" . helm-find-files)
         ;; ^^ I don't seem to like it as much as ido-find-file with flx-ido
         (\"M-y\"   . helm-show-kill-ring)))
")
(save-buffer)
(eval-buffer))