diff options
| author | Pierre Schmitz <pierre@archlinux.de> | 2011-12-03 13:29:22 +0100 |
|---|---|---|
| committer | Pierre Schmitz <pierre@archlinux.de> | 2011-12-03 13:29:22 +0100 |
| commit | ca32f08966f1b51fcb19460f0996bb0c4048e6fe (patch) | |
| tree | ec04cc15b867bc21eedca904cea9af0254531a11 /math/mathml.ml | |
| parent | a22fbfc60f36f5f7ee10d5ae6fe347340c2ee67c (diff) | |
Update to MediaWiki 1.18.0
* also update ArchLinux skin to chagnes in MonoBook
* Use only css to hide our menu bar when printing
Diffstat (limited to 'math/mathml.ml')
| -rw-r--r-- | math/mathml.ml | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/math/mathml.ml b/math/mathml.ml deleted file mode 100644 index b6c76af2..00000000 --- a/math/mathml.ml +++ /dev/null @@ -1,20 +0,0 @@ -open Tex -open Render_info - -type t = TREE_MN of string | TREE_MO of string | TREE_MI of string - -let rec make_mathml_tree = function - TREE_MN a::otr,TEX_LITERAL(MHTMLABLEC(_,_,_,MN,b))::itr -> make_mathml_tree(TREE_MN (a^b)::otr,itr) - | otr,TEX_LITERAL(MHTMLABLEC(_,_,_,MN,a))::itr -> make_mathml_tree(TREE_MN a::otr,itr) - | otr,TEX_LITERAL(MHTMLABLEC(_,_,_,MO,a))::itr -> make_mathml_tree(TREE_MO a::otr,itr) - | otr,TEX_LITERAL(MHTMLABLEC(_,_,_,MI,a))::itr -> make_mathml_tree(TREE_MI a::otr,itr) - | otr,TEX_CURLY(crl)::itr -> make_mathml_tree(otr,crl@itr) - | otr,[] -> List.rev otr - | _ -> failwith "failed to render mathml" - -let render_mathml_tree = function - TREE_MN s -> "<mn>"^s^"</mn>" - | TREE_MI s -> "<mi>"^s^"</mi>" - | TREE_MO s -> "<mo>"^s^"</mo>" - -let render tree = try Some (Util.mapjoin render_mathml_tree (make_mathml_tree ([],tree))) with _ -> None |