Mercurial > emacs
view etc/nxml/027C0-027EF.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 | fbf26ea5e45d |
children | ef719132ddfa |
line wrap: on
line source
(nxml-define-char-name-set 'miscellaneous-mathematical-symbols-a '(("WHITE DIAMOND WITH CENTRED DOT" #x27D0) ("AND WITH DOT" #x27D1) ("ELEMENT OF OPENING UPWARDS" #x27D2) ("LOWER RIGHT CORNER WITH DOT" #x27D3) ("UPPER LEFT CORNER WITH DOT" #x27D4) ("LEFT OUTER JOIN" #x27D5) ("RIGHT OUTER JOIN" #x27D6) ("FULL OUTER JOIN" #x27D7) ("LARGE UP TACK" #x27D8) ("LARGE DOWN TACK" #x27D9) ("LEFT AND RIGHT DOUBLE TURNSTILE" #x27DA) ("LEFT AND RIGHT TACK" #x27DB) ("LEFT MULTIMAP" #x27DC) ("LONG RIGHT TACK" #x27DD) ("LONG LEFT TACK" #x27DE) ("UP TACK WITH CIRCLE ABOVE" #x27DF) ("LOZENGE DIVIDED BY HORIZONTAL RULE" #x27E0) ("WHITE CONCAVE-SIDED DIAMOND" #x27E1) ("WHITE CONCAVE-SIDED DIAMOND WITH LEFTWARDS TICK" #x27E2) ("WHITE CONCAVE-SIDED DIAMOND WITH RIGHTWARDS TICK" #x27E3) ("WHITE SQUARE WITH LEFTWARDS TICK" #x27E4) ("WHITE SQUARE WITH RIGHTWARDS TICK" #x27E5) ("MATHEMATICAL LEFT WHITE SQUARE BRACKET" #x27E6) ("MATHEMATICAL RIGHT WHITE SQUARE BRACKET" #x27E7) ("MATHEMATICAL LEFT ANGLE BRACKET" #x27E8) ("MATHEMATICAL RIGHT ANGLE BRACKET" #x27E9) ("MATHEMATICAL LEFT DOUBLE ANGLE BRACKET" #x27EA) ("MATHEMATICAL RIGHT DOUBLE ANGLE BRACKET" #x27EB) )) ;; arch-tag: f66b9857-6560-4ad9-9adb-1f3b5fb079de