hacky-eslint-fix.el

(defun eslint-fix ()
  (interactive)
  (let ((current-point (point)))
    (unless (eq 0
                (shell-command-on-region
                 ;; Region
                 (point-min)
                 (point-max)
                 ;; Command
                 (concat
                  "eslint_d"
                  " --stdin"
                  " --fix-to-stdout"
                  " --stdin-filename " buffer-file-name)
                 ;; Output to current buffer
                 (current-buffer)
                 ;; Replace buffer
                 t
                 ;; Error buffer name
                 "*eslint-fix error*"
                 ;; Display error buffer
                 t))
      (undo))
    ;; Refresh syntax highlighting
    (font-lock-fontify-buffer)
    (goto-char current-point)))