From a1235e08f815df7d87cf975b4ba9b8459415d666 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Sun, 20 Aug 2023 12:05:55 +0300 Subject: emacs: update vm manager --- emacs.org | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'emacs.org') 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 -- cgit v1.2.3