systemd service mode based on chkservice

Code for creating a chkservice mode and assigning a keybinding to it 1 2 3 4 5 6 7 8 9 (defun make-etui-cmd (cmd) "This function expects a one term command (binary name only) and it returns a new interactive function." (let ((funname (concat "esh-" cmd))) (eval `(defun ,(str2sym funname) (&rest args) "This function expects a one term command (binary name only)." (interactive) (term-nsfa (mapconcat 'q (cons ,cmd args) " ") nil ,cmd))))) (define-key my-mode-map (kbd "M-m a y") (make-etui-cmd "chk...

Submit