From: <kr_...@us...> - 2004-05-08 10:20:25
|
Update of /cvsroot/htoolkit/gio/src/examples/simple In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29642/gio/src/examples/simple Modified Files: SimpleDialog.hs SimpleMenu.hs Log Message: Use the new style for version strings Index: SimpleDialog.hs =================================================================== RCS file: /cvsroot/htoolkit/gio/src/examples/simple/SimpleDialog.hs,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** SimpleDialog.hs 19 Oct 2003 09:33:20 -0000 1.5 --- SimpleDialog.hs 8 May 2004 10:20:14 -0000 1.6 *************** *** 4,8 **** main ! = start "Simple dialogs" "1.0" SDI [] $ do fm <- menu [title =: "&Open"] mainMenu menuitem [title =: "Modal Dialog", on command =: showDialog True Nothing] fm --- 4,8 ---- main ! = start "Simple dialogs" "SimpleDialogs 1.0" SDI [] $ do fm <- menu [title =: "&Open"] mainMenu menuitem [title =: "Modal Dialog", on command =: showDialog True Nothing] fm Index: SimpleMenu.hs =================================================================== RCS file: /cvsroot/htoolkit/gio/src/examples/simple/SimpleMenu.hs,v retrieving revision 1.13 retrieving revision 1.14 diff -C2 -d -r1.13 -r1.14 *** SimpleMenu.hs 22 Nov 2003 10:50:41 -0000 1.13 --- SimpleMenu.hs 8 May 2004 10:20:14 -0000 1.14 *************** *** 4,8 **** main ! = start "SimpleMenu" "1.0" SDI [] $ do w <- window [view =: sz 200 200] showWindow w --- 4,8 ---- main ! = start "Simple menu" "SimpleMenu 1.0" SDI [] $ do w <- window [view =: sz 200 200] showWindow w |