 
 (defcustom govc-keymap-prefix "C-c ;"
   "Prefix for `govc-mode'."
+  :group 'govc)
+
+(defcustom govc-command "govc"
+  "Executable path to the govc utility."
+  :type 'string
   :group 'govc)
 
 (defvar govc-command-map


(defun govc-json-info (command selection)
  "Run govc COMMAND -json on SELECTION."
  (govc-process (govc-command command "-json" govc-args selection)
                (lambda ()
                  (let ((buffer (get-buffer-create (concat "*govc-json*" (if current-prefix-arg selection)))))
                    (copy-to-buffer buffer (point-min) (point-max))

  "Events via govc events -n `govc-max-events'."
  (interactive)
  (govc-shell-command
   (govc-format-command "events"
                        (list "-n" govc-max-events (if current-prefix-arg "-f") (govc-selection)))))

(defun govc-parse-info (output)
  "Parse govc info command OUTPUT."
