[Gtk2hs-users] clicks and TextView

[Eric <ee...@uk...>]

Hi all,

I have written the following code to intercept a mouse click on a TextView:

onButtonPress track (\e -> case e of
                                       Button _ _ _ _ _ _ _ _ _ -> if
eventButton e == RightButton then

          do{ buffer <- textViewGetBuffer track
 

; (start, end) <- textBufferGetSelectionBounds buffer
 

; cs <- textIterGetSlice start end
 

; putStrLn cs
 

; return True}
 

else return True)

However, when I run the code, I can no longer select text with the left
mouse button. How can I fix this?

E.