commit 123035ffd1faf68a00608dbc22ea736938fbe580 from: Omar Polo date: Wed May 26 14:06:32 2021 UTC less verbose docstrings commit - 36267e0bf9ca63a9bf33f5fe6fb72a7509b7c278 commit + 123035ffd1faf68a00608dbc22ea736938fbe580 blob - bc5ba2f5af0fa7bed61e2abc9527cfefdff622f7 blob + 97cf1d76b5ff8f7b8b9c860636f45149c3a8eb51 --- vmd.el +++ vmd.el @@ -90,7 +90,7 @@ commands in cmd." (shell-command (mapconcat #'shell-quote-argument (cons vmd-vmctl-cmd args) " "))) (defun vmd-console (vm) - "Open a console for the virtual machine VM at point." + "Open a console for the VM at point." (interactive (list (vmd--vm-at-point)) vmd-mode) (funcall vmd-console-function (concat "vmd console " vm) @@ -98,25 +98,25 @@ commands in cmd." (list vmd-vmctl-cmd "console" vm)))) (defun vmd-pause (vm) - "Pause the virtual machine VM at point." + "Pause the VM at point." (interactive (list (vmd--vm-at-point)) vmd-mode) (vmd--vmctl "pause" vm) (vmd--update-table)) (defun vmd-start (vm) - "Start the virtual machine VM at point." + "Start the VM at point." (interactive (list (vmd--vm-at-point)) vmd-mode) (vmd--vmctl "start" vm) (vmd--update-table)) (defun vmd-stop (vm) - "Stop the virtual machine VM at point." + "Stop the VM at point." (interactive (list (vmd--vm-at-point)) vmd-mode) (vmd--vmctl "stop" vm) (vmd--update-table)) (defun vmd-unpause (vm) - "Unpause the virtual machine VM at point." + "Unpause the VM at point." (interactive (list (vmd--vm-at-point)) vmd-mode) (vmd--vmctl "unpause" vm) (vmd--update-table))