view etc/schema/xhtml-ruby.rnc @ 109157:76b683a5339b

Minor zone.el fixes for bug#6483. Zone did not like the intangible newlines etc in the gomoku buffer. * lisp/play/zone.el (top-level): Do not require timer, tabify, or cl. (zone-shift-left): Ignore intangibility, and any errors from forward-char. (zone-shift-right): Remove no-op end-of-line. Ignore intangibility. (zone-pgm-putz-with-case): Use upcase-region rather than inserting, deleting, and copying text properties. (zone-line-specs, zone-pgm-stress): Check forward-line exit status. (zone-pgm-rotate): Handle odd buffers like that of gomoku, where getting to point-max is hard. (zone-fret, zone-fill-out-screen): Replace cl's do with dotimes. (zone-fill-out-screen): Ignore intangibility.
author Glenn Morris <rgm@gnu.org>
date Tue, 06 Jul 2010 21:16:27 -0700
parents 38f93f3d00a2
children
line wrap: on
line source

ruby =
  element ruby {
    ruby.attlist,
    ((rb,
      (rt | (rp, rt, rp)))
     | (rbc, rtc, rtc?))
  }
ruby.attlist = Common.attrib
rbc = element rbc { rbc.attlist, rb+ }
rbc.attlist = Common.attrib
rtc = element rtc { rtc.attlist, rt+ }
rtc.attlist = Common.attrib
rb = element rb { rb.attlist, Inline.model }
rb.attlist = Common.attrib
rt = element rt { rt.attlist, Inline.model }
rt.attlist =
  Common.attrib,
  attribute rt { Number.datatype }?
rp = element rp { rp.attlist, text }
rp.attlist = Common.attrib
Inline.class |= ruby