Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 17:24:23 +00:00
Code Issues Projects Releases Packages Wiki Activity

Fix namespace problem in mpc.el

Browse source 
* lisp/mpc.el (mpc-tag-browser-tagtypes): Rename from
'tag-browser-tagtypes'.  Retain old name as an obsolete alias.
This commit is contained in:
Stefan Kangas 2022-08-04 11:32:26 +02:00
parent 27b60ae061
commit a53ee9928d
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/mpc.el
View file

@ -1569,8 +1569,9 @@ when constructing the set of constraints."
(mpc-tagbrowser-refresh)
buf))))
(defvar tag-browser-tagtypes
(lazy-completion-table tag-browser-tagtypes
(define-obsolete-variable-alias 'tag-browser-tagtypes 'mpc-tag-browser-tagtypes "29.1")
(defvar mpc-tag-browser-tagtypes
(lazy-completion-table mpc-tag-browser-tagtypes
(lambda ()
(append '("Playlist" "Directory")
(mpc-cmd-tagtypes)))))
@ -1581,7 +1582,7 @@ when constructing the set of constraints."
(list
(let ((completion-ignore-case t))
(intern
(completing-read "Tag: " tag-browser-tagtypes nil 'require-match)))))
(completing-read "Tag: " mpc-tag-browser-tagtypes nil 'require-match)))))
(let* ((newbuf (mpc-tagbrowser-buf tag))
(win (get-buffer-window newbuf 0)))
(if win (select-window win)