diff --git a/qtah-examples.cabal b/qtah-examples.cabal
--- a/qtah-examples.cabal
+++ b/qtah-examples.cabal
@@ -1,5 +1,5 @@
 name: qtah-examples
-version: 0.1.2
+version: 0.2.0
 synopsis: Example programs for Qtah Qt bindings
 homepage: http://khumba.net/projects/qtah
 license: LGPL-3
@@ -24,7 +24,7 @@
     , binary >=0.7 && <0.9
     , bytestring >=0.10 && <0.11
     , filepath >=1.0 && <1.5
-    , hoppy-runtime >=0.2 && <0.3
-    , qtah-qt5 >=0.1 && <0.2
+    , hoppy-runtime >=0.3 && <0.4
+    , qtah-qt5 >=0.2 && <0.3
   ghc-options: -W -fwarn-incomplete-patterns -fwarn-unused-do-bind
   default-language: Haskell2010
diff --git a/src/Graphics/UI/Qtah/Example/Notepad.hs b/src/Graphics/UI/Qtah/Example/Notepad.hs
--- a/src/Graphics/UI/Qtah/Example/Notepad.hs
+++ b/src/Graphics/UI/Qtah/Example/Notepad.hs
@@ -67,6 +67,7 @@
 makeMainWindow :: IO QMainWindow
 makeMainWindow = do
   window <- QMainWindow.new
+  QWidget.resizeRaw window 640 480
 
   menu <- QMenuBar.new
   QMainWindow.setMenuBar window menu
@@ -189,13 +190,13 @@
                         (myWindow me)
                         title
                         "There are unsaved changes.  Would you like to save them?"
-                        (QMessageBox.qMessageBoxStandardButtons_Yes .|.
-                         QMessageBox.qMessageBoxStandardButtons_No .|.
-                         QMessageBox.qMessageBoxStandardButtons_Cancel)
-                        QMessageBox.QMessageBoxStandardButton_Cancel
+                        (QMessageBox.yes .|.
+                         QMessageBox.no .|.
+                         QMessageBox.cancel)
+                        QMessageBox.Cancel
             case response of
-              QMessageBox.QMessageBoxStandardButton_Yes -> fileSave me
-              QMessageBox.QMessageBoxStandardButton_No -> return True
+              QMessageBox.Yes -> fileSave me
+              QMessageBox.No -> return True
               _ -> return False
     else return True