summaryrefslogtreecommitdiffhomepage
path: root/lib/media/jao-spt.el
diff options
context:
space:
mode:
Diffstat (limited to 'lib/media/jao-spt.el')
-rw-r--r--lib/media/jao-spt.el13
1 files changed, 13 insertions, 0 deletions
diff --git a/lib/media/jao-spt.el b/lib/media/jao-spt.el
index c4c1604..1fdee83 100644
--- a/lib/media/jao-spt.el
+++ b/lib/media/jao-spt.el
@@ -110,5 +110,18 @@
(defun jao-spt-set-up ()
(jao-minibuffer-add-msg-variable 'jao-spt--status-str))
+(defun jao-spt-lyrics-info ()
+ (let* ((jao-spt-format "%a~~~%t")
+ (s (jao-spt--pb))
+ (at (split-string s "~~~")))
+ (cons (car at) (cadr at))))
+
+(declare jao-show-lyrics "jao-lyrics")
+
+;;;###autoload
+(defun jao-spt-show-lyrics (force)
+ (interactive "P")
+ (jao-show-lyrics force #'jao-spt-lyrics-info))
+
(provide 'jao-spt)
;;; jao-spt.el ends here