Mercurial > emacs
view etc/nxml/031A0-031BF.el @ 107541:d59e6301c2cd
Add "union tags" in mpc.el.
* mpc.el: Remove backward compatibility code.
(mpc-browser-tags): Change default.
(mpc--find-memoize-union-tags): New var.
(mpc-cmd-flush, mpc-cmd-special-tag-p): New fun.
(mpc-cmd-find): Handle the case where the playlist does not exist.
Handle union-tags.
(mpc-cmd-list): Use mpc-cmd-special-tag-p. Handle union-tags.
(mpc-cmd-add): Use mpc-cmd-flush.
(mpc-tagbrowser-tag-name): New fun.
(mpc-tagbrowser-buf): Use it.
(mpc-songs-refresh): Use cond. Move to point-min as a fallback.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Wed, 24 Mar 2010 20:06:08 -0400 |
parents | 74533c95b504 |
children | ef719132ddfa |
line wrap: on
line source
(nxml-define-char-name-set 'bopomofo-extended '(("BOPOMOFO LETTER BU" #x31A0) ("BOPOMOFO LETTER ZI" #x31A1) ("BOPOMOFO LETTER JI" #x31A2) ("BOPOMOFO LETTER GU" #x31A3) ("BOPOMOFO LETTER EE" #x31A4) ("BOPOMOFO LETTER ENN" #x31A5) ("BOPOMOFO LETTER OO" #x31A6) ("BOPOMOFO LETTER ONN" #x31A7) ("BOPOMOFO LETTER IR" #x31A8) ("BOPOMOFO LETTER ANN" #x31A9) ("BOPOMOFO LETTER INN" #x31AA) ("BOPOMOFO LETTER UNN" #x31AB) ("BOPOMOFO LETTER IM" #x31AC) ("BOPOMOFO LETTER NGG" #x31AD) ("BOPOMOFO LETTER AINN" #x31AE) ("BOPOMOFO LETTER AUNN" #x31AF) ("BOPOMOFO LETTER AM" #x31B0) ("BOPOMOFO LETTER OM" #x31B1) ("BOPOMOFO LETTER ONG" #x31B2) ("BOPOMOFO LETTER INNN" #x31B3) ("BOPOMOFO FINAL LETTER P" #x31B4) ("BOPOMOFO FINAL LETTER T" #x31B5) ("BOPOMOFO FINAL LETTER K" #x31B6) ("BOPOMOFO FINAL LETTER H" #x31B7) )) ;; arch-tag: 1821baca-d463-4e8e-bf3d-97a35af58fd4