diff options
| author | Yuchen Pei <id@ypei.org> | 2025-03-09 09:46:35 +1100 |
|---|---|---|
| committer | Yuchen Pei <id@ypei.org> | 2025-03-09 09:46:35 +1100 |
| commit | 4c65d5f267f3ed70224ae6e8c26430a9571a21dd (patch) | |
| tree | 24c93ea5d2ae8f32e2e49e861a5b6504229f1fa1 /emacs/.emacs.d/lisp/my/my-utils.el | |
| parent | 91a65da0359839fd5d4c95d62d49fabffad8998a (diff) | |
[emacs][mpv][bashrc] emms group play fix
Diffstat (limited to 'emacs/.emacs.d/lisp/my/my-utils.el')
| -rw-r--r-- | emacs/.emacs.d/lisp/my/my-utils.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/emacs/.emacs.d/lisp/my/my-utils.el b/emacs/.emacs.d/lisp/my/my-utils.el index 3ecd0a9..0743227 100644 --- a/emacs/.emacs.d/lisp/my/my-utils.el +++ b/emacs/.emacs.d/lisp/my/my-utils.el @@ -304,6 +304,13 @@ Example: (format-time-string ... (my-time-from-epoch 1698582504))" ,@body (setq default-directory saved))) + +(defun my-call-process-out (command &rest args) + "Call `call-process' on COMMAND with ARGS and return the output." + (with-temp-buffer + (apply 'call-process (append (list command nil t nil) args)) + (buffer-string))) + (defun my-call-process-with-torsocks (program &optional infile destination display &rest args) (apply 'call-process |