diff options
author | Yuchen Pei <id@ypei.org> | 2025-08-03 14:28:31 +1000 |
---|---|---|
committer | Yuchen Pei <id@ypei.org> | 2025-08-03 14:28:31 +1000 |
commit | 12bf5860034eec0cec6b6086c3fa676e17ed1a8a (patch) | |
tree | 6dedd41a4650c1715a56736f41619f4dd414e011 /emacs/.emacs.d/lisp/my/my-utils.el | |
parent | 870a3222c45dfb65f4a9692c73be973f77aeb9ed (diff) |
[emacs] Add tor utils
Diffstat (limited to 'emacs/.emacs.d/lisp/my/my-utils.el')
-rw-r--r-- | emacs/.emacs.d/lisp/my/my-utils.el | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/emacs/.emacs.d/lisp/my/my-utils.el b/emacs/.emacs.d/lisp/my/my-utils.el index ff65420..98c8caa 100644 --- a/emacs/.emacs.d/lisp/my/my-utils.el +++ b/emacs/.emacs.d/lisp/my/my-utils.el @@ -312,17 +312,6 @@ Example: (format-time-string ... (my-time-from-epoch 1698582504))" (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 - (append (list "torsocks" infile destination display program) args))) - -(defun my-start-process-with-torsocks (no-tor name buffer program &rest program-args) - (if no-tor - (apply 'start-process (append (list name buffer program) program-args)) - (apply 'start-process - (append (list name buffer "torsocks" program) program-args)))) - (defun my-touch-new-file (filename) "Touch a new file." (with-temp-buffer (write-file filename))) |