Remove use of deprecated onSwitchPage

yi-editor · Oct 12, 2014 · 59fca4b · 59fca4b
1 parent d2348ad
commit 59fca4b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/yi/src/library/Yi/UI/Pango/Layouts.hs b/yi/src/library/Yi/UI/Pango/Layouts.hs
@@ -413,7 +413,7 @@ simpleNotebookSet sn ts = do
 
 -- | The 'onSwitchPage' callback
 simpleNotebookOnSwitchPage :: SimpleNotebook -> (Int -> IO ()) -> IO ()
-simpleNotebookOnSwitchPage sn cb = void $ onSwitchPage (snMainWidget sn) cb
+simpleNotebookOnSwitchPage sn = void . (snMainWidget sn `on` switchPage)
 
 
 ------------------- Utils