Mercurial > emacs
view etc/nxml/01720-0173F.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 | d26545774eef |
children | ef719132ddfa |
line wrap: on
line source
(nxml-define-char-name-set 'hanunoo '(("HANUNOO LETTER A" #x1720) ("HANUNOO LETTER I" #x1721) ("HANUNOO LETTER U" #x1722) ("HANUNOO LETTER KA" #x1723) ("HANUNOO LETTER GA" #x1724) ("HANUNOO LETTER NGA" #x1725) ("HANUNOO LETTER TA" #x1726) ("HANUNOO LETTER DA" #x1727) ("HANUNOO LETTER NA" #x1728) ("HANUNOO LETTER PA" #x1729) ("HANUNOO LETTER BA" #x172A) ("HANUNOO LETTER MA" #x172B) ("HANUNOO LETTER YA" #x172C) ("HANUNOO LETTER RA" #x172D) ("HANUNOO LETTER LA" #x172E) ("HANUNOO LETTER WA" #x172F) ("HANUNOO LETTER SA" #x1730) ("HANUNOO LETTER HA" #x1731) ("HANUNOO VOWEL SIGN I" #x1732) ("HANUNOO VOWEL SIGN U" #x1733) ("HANUNOO SIGN PAMUDPOD" #x1734) ("PHILIPPINE SINGLE PUNCTUATION" #x1735) ("PHILIPPINE DOUBLE PUNCTUATION" #x1736) )) ;; arch-tag: d577c8e1-70e3-4afc-82f4-b61e4cf0b603