diff options
| author | jao <jao@gnu.org> | 2020-06-24 02:58:59 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2020-06-24 02:58:59 +0100 |
| commit | 348c39d0d7f76fe2ec0d62e729e7e11e1e9ec073 (patch) | |
| tree | 163a0c9d753d00938dedcb333aab1723c10cbfe1 /net/jao-lyrics.el | |
| parent | 6bdf3f32fe4b1e0ceaaaafb1188c0650d7ee6d5e (diff) | |
| download | elibs-348c39d0d7f76fe2ec0d62e729e7e11e1e9ec073.tar.gz elibs-348c39d0d7f76fe2ec0d62e729e7e11e1e9ec073.tar.bz2 | |
lyrics tweaks
Diffstat (limited to 'net/jao-lyrics.el')
| -rw-r--r-- | net/jao-lyrics.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/net/jao-lyrics.el b/net/jao-lyrics.el index 79be660..1967b3f 100644 --- a/net/jao-lyrics.el +++ b/net/jao-lyrics.el @@ -116,9 +116,9 @@ (defvar jao-lyrics-info-function) -(defun jao-show-lyrics (&optional force) +(defun jao-show-lyrics (&optional force info-function) (interactive "P") - (let* ((a/t (funcall jao-lyrics-info-function)) + (let* ((a/t (funcall (or info-function jao-lyrics-info-function))) (artist (car a/t)) (title (cdr a/t)) (artist (if force (read-string "Artist: " artist) artist)) |