The R13B03 release.OTP_R13B03

1 files changed, 102 insertions, 0 deletions

diff --git a/erts/etc/win32/beam.rc b/erts/etc/win32/beam.rc
new file mode 100644
index 0000000000..cd7db67d4d
--- /dev/null
+++ b/erts/etc/win32/beam.rc
@@ -0,0 +1,102 @@
+//
+// %CopyrightBegin%
+// 
+// Copyright Ericsson AB 1997-2009. All Rights Reserved.
+// 
+// The contents of this file are subject to the Erlang Public License,
+// Version 1.1, (the "License"); you may not use this file except in
+// compliance with the License. You should have received a copy of the
+// Erlang Public License along with this software. If not, it can be
+// retrieved online at http://www.erlang.org/.
+// 
+// Software distributed under the License is distributed on an "AS IS"
+// basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
+// the License for the specific language governing rights and limitations
+// under the License.
+// 
+// %CopyrightEnd%
+//
+#include <windows.h>
+#include "resource.h"
+
+1           ICON    DISCARDABLE     "erlang.ico"
+2           ICON    DISCARDABLE     "erl_icon.ico"
+3           ICON    DISCARDABLE     "hrl_icon.ico"
+4           ICON    DISCARDABLE     "beam_icon.ico"
+1           BITMAP  MOVEABLE PURE   "toolbar.bmp"
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// Menu
+//
+1 MENU DISCARDABLE 
+BEGIN
+    POPUP "&File"
+    BEGIN
+        MENUITEM "&Open Logfile...",            IDMENU_STARTLOG
+        MENUITEM "&Close Logfile",              IDMENU_STOPLOG
+        MENUITEM SEPARATOR
+        MENUITEM "&Exit\tAlt+F4",               IDMENU_EXIT
+    END
+    POPUP "&Edit"
+    BEGIN
+        MENUITEM "&Copy\tCtrl+C",               IDMENU_COPY
+        MENUITEM "&Paste\tCtrl+V",              IDMENU_PASTE
+        MENUITEM SEPARATOR
+        MENUITEM "Select A&ll",                 IDMENU_SELALL
+    END
+    POPUP "&Options"
+    BEGIN
+        MENUITEM "&Select Font...",             IDMENU_FONT
+        MENUITEM "Select &Background...",       IDMENU_SELECTBKG
+    END
+    POPUP "&View"
+    BEGIN
+        MENUITEM "&Toolbar",             	IDMENU_TOOLBAR
+    END
+    POPUP "&Help"
+    BEGIN
+        MENUITEM "&About",                      IDMENU_ABOUT
+    END
+END
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// Dialog
+//
+AboutBox DIALOG DISCARDABLE  0, 0, 217, 55
+STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU
+CAPTION "About Erlang Shell"
+FONT 8, "MS Sans Serif"
+BEGIN
+    ICON            1,-1,11,17,18,20
+    LTEXT           "Erlang Shell Version 1.0",ID_VERSIONSTRING,40,10,119,8,
+                    SS_NOPREFIX
+    LTEXT           "Copyright � Ericsson Telecom AB",-1,40,25,
+                    119,8
+    DEFPUSHBUTTON   "OK",IDOK,178,7,32,14,WS_GROUP
+END
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// Accelerators
+//
+
+1 ACCELERATORS
+{
+    VK_CANCEL, ID_BREAK,     VIRTKEY, CONTROL
+    "^C",      IDMENU_COPY
+    VK_INSERT, IDMENU_COPY,  VIRTKEY, CONTROL
+    "^V",      IDMENU_PASTE
+    VK_INSERT, IDMENU_PASTE, VIRTKEY, SHIFT
+    VK_F1,     IDMENU_ABOUT, VIRTKEY
+}
+
+
+
+
+
+
+
+
+