emacs: update vm manager

1 files changed, 4 insertions, 4 deletions

diff --git a/emacs.org b/emacs.org
index 752b182..ec6744d 100755
--- a/emacs.org
+++ b/emacs.org
@@ -304,11 +304,11 @@ Generate a random password between 20 and 40 characters
 	  (cores (read-string "Cores: "))
 	  (image (read-file-name "Image: " vm-directory))
 	  (iso (if (y-or-n-p "Load iso?? ")
-		     (read-file-name "ISO: ")
-		   nil)))
-      (async-shell-command
+		   (read-file-name "ISO: ")
+		 nil)))
+      (start-process-shell-command "virtual-machine" nil
        (format "qemu-system-x86_64 -enable-kvm -m %s -smp %s -hda %s -vga qxl -device virtio-serial-pci -spice port=5784,disable-ticketing -display spice-app %s "
-	       memory cores image (if iso (concat "-cdrom " iso) "")))))
+	       memory cores image (when iso (concat "-cdrom " iso)))))
 #+end_src 
 * Dired
 ** Functions