X-Git-Url: http://git.megacz.com/?p=wix.git;a=blobdiff_plain;f=src%2FDoc.lhs;h=f8336f5cec2373b7dfec7cdfc51f3c2398685ec2;hp=6d1baa73495afc6690b6a9a3a0dd1311607f3e98;hb=757259623cca7cd1114e52a12bc01fe424361255;hpb=e6b058675419bdc7fb164809807837eb5e49c7dd

diff --git a/src/Doc.lhs b/src/Doc.lhs
index 6d1baa7..f8336f5 100644
--- a/src/Doc.lhs
+++ b/src/Doc.lhs
@@ -46,7 +46,7 @@ data Text      = WS
 data Glyph     = Euro | CircleR | CircleC | TradeMark | ServiceMark
                | Emdash | Ellipsis | Cent | Daggar | DoubleDaggar
                | Clover | Flat | Sharp | Natural | CheckMark | XMark
-               | LeftArrow | DoubleLeftArrow | DoubleRightArrow
+               | LeftArrow | RightArrow | DoubleLeftArrow | DoubleRightArrow
                | DoubleLeftRightArrow | LeftRightArrow | Degree
 
 data Login     = Login String (Maybe String)