diff options
author | Sacha Chua <sacha@sachachua.com> | 2022-11-29 15:53:42 -0500 |
---|---|---|
committer | Sacha Chua <sacha@sachachua.com> | 2022-11-29 15:53:42 -0500 |
commit | c5516a13aad78677729a30435b23b4607dffdc29 (patch) | |
tree | b89a5d570acd8017740fee1ed22225e098585b4c /emacsconf.el | |
parent | 1ccaaaa3ca97b53573f78b3afe80987cd61b5dff (diff) | |
download | emacsconf-el-c5516a13aad78677729a30435b23b4607dffdc29.tar.xz emacsconf-el-c5516a13aad78677729a30435b23b4607dffdc29.zip |
emacsconf-stream-show-playback-info: keep track of mpv position
Diffstat (limited to 'emacsconf.el')
-rw-r--r-- | emacsconf.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/emacsconf.el b/emacsconf.el index 214e896..a5a9a0e 100644 --- a/emacsconf.el +++ b/emacsconf.el @@ -1366,5 +1366,9 @@ tracks with the ID in the cdr of that list." (interactive (list (read-file-name "File: " (expand-file-name "./" emacsconf-cache-dir) nil t))) (find-file (expand-file-name filename emacsconf-cache-dir))) +(defun emacsconf-format-seconds (seconds) + (concat (format-seconds "%.2m:%.2s" (floor seconds)) + "." (format "%03d" (% (floor (* 1000 seconds)) 1000)))) + (provide 'emacsconf) ;;; emacsconf.el ends here |