diff options
Diffstat (limited to 'emacs/.emacs.d/lisp/my/my-utils.el')
| -rw-r--r-- | emacs/.emacs.d/lisp/my/my-utils.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/emacs/.emacs.d/lisp/my/my-utils.el b/emacs/.emacs.d/lisp/my/my-utils.el index 550d33e..05ca2e6 100644 --- a/emacs/.emacs.d/lisp/my/my-utils.el +++ b/emacs/.emacs.d/lisp/my/my-utils.el @@ -319,6 +319,9 @@ Example: (format-time-string ... (my-time-from-epoch 1698582504))" "Touch a new file." (with-temp-buffer (write-file filename))) +(defun my-touch-file-mtime (file date) + (call-process "touch" nil nil nil "-d" date file)) + (defvar my-extension-types '((audio . ("asf" "cue" "flac" "m4a" "m4r" "mid" "mp3" "ogg" "opus" "wav" "wma" "spc" "mp4")) |