 (defun govc-vm-json-info ()
   "JSON via govc vm.info -json on current selection."
   (interactive)
-  (govc-json-info "vm.info"))
+  (govc-json-info-selection "vm.info"))
 
 (defvar govc-vm-mode-map
   (let ((map (make-sparse-keymap)))

(defun govc-datastore-json-info ()
  "JSON via govc datastore.info -json on current selection."
  (interactive)
  (govc-json-info "datastore.info"))

(defun govc-datastore-info ()
  "Wrapper for govc datastore.info."

  "JSON via govc datastore.ls -json on current selection."
  (interactive)
  (let ((govc-args '("-l" "-p")))
    (govc-json-info-selection "datastore.ls")))

(defun govc-datastore-mkdir (name)
  "Mkdir via govc datastore.mkdir with given NAME."
