Re: WinHugs, fix up menu help messages
Neil Mitchell <[email protected]>
| Newsgroups | gmane.comp.lang.haskell.cvs.hugs |
|---|---|
| Message-ID | <[email protected]> |
Hi, Updated patch. Like before, but: No users guide/manual. The users guide can go under Help/Contents. HELPCOMMANDS text changed Added link to heirarchical libraries. I'll fix the code to agree with the menu items once the .chm files can be successfully built, so I know whats happening with them. Thanks Neil _______________________________________________ Cvs-hugs mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-hugs
menu-description2.patch
(application/octet-stream, 4.9 KB)
Index: src/winhugs/resrc1.h
===================================================================
RCS file: /cvs/hugs98/src/winhugs/resrc1.h,v
retrieving revision 1.4
diff -u -r1.4 resrc1.h
--- src/winhugs/resrc1.h 7 Sep 2005 11:25:00 -0000 1.4
+++ src/winhugs/resrc1.h 8 Sep 2005 13:23:13 -0000
@@ -48,13 +48,14 @@
#define ID_DELETE 40020
#define ID_CLEARSCREEN 40021
#define ID_SELECTALL 40022
+#define ID_LIBRARIES 40023
// Next default values for new objects
//
#ifdef APSTUDIO_INVOKED
#ifndef APSTUDIO_READONLY_SYMBOLS
#define _APS_NEXT_RESOURCE_VALUE 110
-#define _APS_NEXT_COMMAND_VALUE 40023
+#define _APS_NEXT_COMMAND_VALUE 40024
#define _APS_NEXT_CONTROL_VALUE 1037
#define _APS_NEXT_SYMED_VALUE 101
#endif
Index: src/winhugs/winhugs.rc
===================================================================
RCS file: /cvs/hugs98/src/winhugs/winhugs.rc,v
retrieving revision 1.19
diff -u -r1.19 winhugs.rc
--- src/winhugs/winhugs.rc 7 Sep 2005 16:32:22 -0000 1.19
+++ src/winhugs/winhugs.rc 8 Sep 2005 13:23:45 -0000
@@ -116,7 +116,7 @@
BEGIN
MENUITEM "&Contents\tF1 ", ID_HELPCONTENTS
MENUITEM "Hugs C&ommands", ID_HELPCOMMANDS
- MENUITEM "User &Guide", ID_USERSGUIDE
+ MENUITEM "Hierarchical &Libraries", ID_LIBRARIES
MENUITEM SEPARATOR
MENUITEM "&Hugs Website", ID_WWWHUGS
MENUITEM "Haskell &Website", ID_WWWHASKELL
@@ -430,16 +430,6 @@
STRINGTABLE
BEGIN
- ID_FILESMENU "Manage script files (Open, New...)"
- ID_EDITMENU "Cut, copy, paste and clear"
- ID_INTERPRETERMENU "Run, Compile, Evaluate, ..."
- ID_BROWSEMENU "Browse classes, instances, members, names and type constructors"
- ID_HELPMENU "View online help"
- ID_OPTIONSMENU "Manage interpreter options (Set, Save...)"
-END
-
-STRINGTABLE
-BEGIN
ID_NEW "Edit a new script file"
ID_OPEN "Load modules from specified file"
ID_SCRIPTMAN "Enter Module Manager"
@@ -453,15 +443,12 @@
ID_PASTE "Paste text from clipboard"
ID_GOEDIT "Run text editor"
ID_CUT "Cut selected text"
- ID_CLEAR "Clear selected text"
- ID_FIND "Find definition of selected name"
ID_GOPREVIOUS "Edit previous input line"
END
STRINGTABLE
BEGIN
ID_GONEXT "Edit next input line"
- ID_EDITSELECTED "Edit selected file"
END
STRINGTABLE
@@ -477,7 +464,6 @@
ID_COMPILE "Reload files"
ID_MAKE "Reload files for current project"
ID_CLEARALL "Clear all files except prelude"
- ID_INFO "Show information on selected text"
END
STRINGTABLE
@@ -496,26 +482,8 @@
STRINGTABLE
BEGIN
ID_HELPINDEX "Display help contents"
- ID_HELPFIND "Buscar ayuda sobre una palabra"
- ID_HELPUSE "Display help on help"
ID_ABOUT "Display version info"
- ID_HELPCOMMANDS "Display Hugs commands"
- ID_HELPREPORT "Display the Haskell Report"
- ID_HELPLIBS "Display the Haskell Library Report"
-END
-
-STRINGTABLE
-BEGIN
- ID_HELPGENTLE "Display the Gentle Introduction to Haskell"
- ID_HELPDOCS "Display Hugs documentation"
- ID_HELPEXTS "Display Hugs and Ghc libraries"
- ID_HELPHASKELLORG "Go to haskell.org"
-END
-
-STRINGTABLE
-BEGIN
- IDS_FILTERPROJECT "Hugs Projects(*.hp)|*.hp|Projects(*.prj)|*.prj|All files(*.*)|*.*|"
- IDS_FILTERFILE "Haskell files(*.hs *.lhs)|*.hs;*.lhs|Gofer files(*.gs *.gof *.lgs)|*.gs;*.gof;*.lgs|Literate Scripts(*.lhs *.lgs *.ver *.lit)|*.lgs;*.lhs;*.ver;*.lit|Preludes(*.pre)|*.pre|All files(*.*)|*.*|"
+ ID_HELPCOMMANDS "Summary of Hugs commands"
END
STRINGTABLE
@@ -572,6 +540,21 @@
159 "Load recently loaded file"
END
+STRINGTABLE
+BEGIN
+ ID_DELETE "Delete the currently selected text"
+ ID_CLEARSCREEN "Clear the screen"
+ ID_SELECTALL "Select all the text"
+ ID_LIBRARIES "Information on the Hierarchical Libraries"
+END
+
+STRINGTABLE
+BEGIN
+ ID_WWWHUGS "Visit the Hugs website, www.haskell.org/hugs"
+ ID_WWWHASKELL "Visit the Haskell website, www.haskell.org"
+ ID_HELPCONTENTS "Show the help contents"
+END
+
#endif // English (U.K.) resources
/////////////////////////////////////////////////////////////////////////////