 (defun harmsway/install-world-sentinel (proc change)
   "A process sentinel to track the state of PROC, via CHANGE."
   (when (string-match-p "\\(finished\\|exited\\)" change)
-    (message "install-world.sh finished.")))
+    (message "%s finished." harmsway-install--last-cmd)))
 
 (provide 'install-world)
 ;;; install-world.el ends here

;;; Commentary:
;; Provides utilities to install harmsway.
;;

;;; Code:
;;;###autoload
(defun harmsway/install-world ()
  "Install the harmsway world."
  (interactive)
  (let* ((buf (get-buffer-create " *Install-World*"))
         proc)
    (setq proc (start-process "install-world" buf
                              "sh" "-c" "install-world.sh"))
    (with-current-buffer (pop-to-buffer buf)
      (read-only-mode 1))
    (set-process-sentinel proc #'harmsway/install-world-sentinel)))

;; Author: Dan Harms <enniomore@icloud.com>
;; Created: Wednesday, November 22, 2017
;; Version: 1.0
;; Modified Time-stamp: <2017-11-29 11:33:08 dharms>
;; Modified by: Dan Harms
;; Keywords: tools

