Add TODO note

This commit is contained in:
hasufell 2014-10-09 03:10:52 +02:00
parent 1fd0b9f27f
commit f230738e08
No known key found for this signature in database
GPG Key ID: 220CD1C5BDEED020
1 changed files with 1 additions and 0 deletions

1
Gtk.hs
View File

@ -146,6 +146,7 @@ onClickedDrawButton mygui = do
Just x -> do
cId <- onExpose (da mygui) (\_ -> drawDiag' x mygui >>=
(\_ -> return True))
-- TODO: does not work properly
_ <- on fcb fileActivated (signalDisconnect cId)
ret <- drawDiag' x mygui
case ret of