From ca083d06bf7555a19e7b86705d4300fe4e75498e Mon Sep 17 00:00:00 2001 From: Joseph Turner Date: Tue, 6 Dec 2022 00:42:03 -0800 Subject: [PATCH] Echo song position, artist, and name when seeking --- simple-mpc.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/simple-mpc.el b/simple-mpc.el index a61071d..254c4b8 100644 --- a/simple-mpc.el +++ b/simple-mpc.el @@ -73,12 +73,14 @@ (defun simple-mpc-seek-forward () "Does a relative seek forward by `simple-mpc-seek-time-in-s' seconds." (interactive) - (simple-mpc-seek-internal simple-mpc-seek-time-in-s)) + (simple-mpc-seek-internal simple-mpc-seek-time-in-s) + (message "%s" (concat (simple-mpc-song-position) " " (simple-mpc-current-artist-and-song)))) (defun simple-mpc-seek-backward () "Does a relative seek backward by -`simple-mpc-seek-time-in-s' seconds." (interactive) - (simple-mpc-seek-internal (- simple-mpc-seek-time-in-s))) + (simple-mpc-seek-internal (- simple-mpc-seek-time-in-s)) + (message "%s" (concat (simple-mpc-song-position) " " (simple-mpc-current-artist-and-song)))) (defun simple-mpc-seek-internal (time-in-seconds) "Seek current song by TIME-IN-SECONDS." -- 2.45.2