35 lines
1.2 KiB
Plaintext
35 lines
1.2 KiB
Plaintext
|
|
include GtkEngine.e
|
|
|
|
-- This is some boilerplate text used by test5.ex to demonstrate markup.
|
|
--
|
|
-- Note that in the first line of text, we offer GTK a choice of fonts;
|
|
-- it will use the first available.
|
|
--
|
|
-- This is necessary since Windows, for example, probably won't have
|
|
-- URW Chancery L, and Linux may not have Comic Sans MS! The fallback
|
|
-- if neither exists is sans. Font names are separated by commas,
|
|
-- Whichever font is found will be 32 point. Size comes last, not preceeded
|
|
-- by a comma.
|
|
|
|
export constant text =
|
|
"""
|
|
<span font='Purisa, URW Chancery L, Comic Sans MS, Sans 32'>Hello <b>World!</b></span>
|
|
|
|
<span color='red' size='xx-large'>Howdy!</span>
|
|
|
|
<span underline_color='green' strikethrough_color='blue'>
|
|
This is <u>underlined</u> <sub>subscripted</sub>
|
|
this is <s>strike thru</s> <sup>superscripted</sup> </span>
|
|
this is <span underline='double' color='blue'>double underlined</span>
|
|
this is an <span underline='error' color='red'>error</span>
|
|
XML: © 2015 Naskapi woo: ᐖ and ß ﬓ as well.
|
|
"""
|
|
|
|
export constant docs =
|
|
sprintf(`You can use <b>Markup</b> similar to html to set the style of text.
|
|
See <a href="file://%s">Pango Markup</a>.
|
|
`,
|
|
{canonical_path("~/demos/documentation/pango_markup.html")})
|
|
|