Mercurial > emacs
view etc/nxml/02440-0245F.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 | a76a6e77bd7d |
children | ef719132ddfa |
line wrap: on
line source
(nxml-define-char-name-set 'optical-character-recognition '(("OCR HOOK" #x2440) ("OCR CHAIR" #x2441) ("OCR FORK" #x2442) ("OCR INVERTED FORK" #x2443) ("OCR BELT BUCKLE" #x2444) ("OCR BOW TIE" #x2445) ("OCR BRANCH BANK IDENTIFICATION" #x2446) ("OCR AMOUNT OF CHECK" #x2447) ("OCR DASH" #x2448) ("OCR CUSTOMER ACCOUNT NUMBER" #x2449) ("OCR DOUBLE BACKSLASH" #x244A) )) ;; arch-tag: e532db31-38fd-4eee-8e47-974316fb6dd5