Attributes.hs

module Graphics.Proc.Lib.Typography.Attributes(
--	textSize
) where

{-
import Graphics.Rendering.FTGL
import Graphics.Proc.Core

import Graphics.Proc.Lib.Typography.Display

textSize :: Int -> Pio ()
textSize size = onFont $ \font -> setFontSize font size


-- consider using these types for alignment
data TextAlignX = AlignLeft | AlignRight | AlignCenterX
data TextAlignY = AlignTop | AlignBottom | AlignCenterY | AlignBaseline

textAlignX :: TextAlignX -> Draw
textAlignX tx = undefined

textAlign :: TextAlignX -> TextAlignY -> Draw
textAlign tx ty = undefined
-}