summaryrefslogtreecommitdiffstats
path: root/mac/tkMacResource.r
diff options
context:
space:
mode:
Diffstat (limited to 'mac/tkMacResource.r')
-rw-r--r--mac/tkMacResource.r23
1 files changed, 10 insertions, 13 deletions
diff --git a/mac/tkMacResource.r b/mac/tkMacResource.r
index 3ff3db4..491ff72 100644
--- a/mac/tkMacResource.r
+++ b/mac/tkMacResource.r
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkMacResource.r,v 1.3 1998/09/14 18:23:39 stanton Exp $
+ * RCS: @(#) $Id: tkMacResource.r,v 1.4 1999/04/16 01:51:32 stanton Exp $
*/
/*
@@ -73,12 +73,7 @@ resource 'vers' (2) {
* will load the TEXT resource named "Init".
*/
-read 'TEXT' (0, "Init", purgeable, preload)
- ":::tcl" TCL_VERSION ":library:init.tcl";
-read 'TEXT' (1, "History", purgeable, preload)
- ":::tcl" TCL_VERSION ":library:history.tcl";
-read 'TEXT' (2, "Word", purgeable,preload)
- ":::tcl" TCL_VERSION ":library:word.tcl";
+#include "tclMacTclCode.r"
read 'TEXT' (10, "tk", purgeable, preload) "::library:tk.tcl";
read 'TEXT' (11, "button", purgeable, preload) "::library:button.tcl";
@@ -128,18 +123,20 @@ resource 'STR#' (128, "Tcl Environment Variables") {
*/
resource 'DLOG' (128, "Default About Box", purgeable) {
- {85, 107, 243, 406}, dBoxProc, visible, goAway, 0,
+ {85, 107, 260, 412}, dBoxProc, visible, goAway, 0,
128, "", centerMainScreen
};
resource 'DITL' (128, "About Box", purgeable) {
{
- {128, 128, 148, 186}, Button {enabled, "Ok"},
- { 14, 108, 117, 310}, StaticText {disabled,
+ {143, 147, 167, 201}, Button {enabled, "Ok"},
+ { 14, 108, 137, 314}, StaticText {disabled,
"Wish - Windowing Shell" "\n" "based on Tcl "
- TCL_PATCH_LEVEL " & Tk " TK_PATCH_LEVEL "\n\n" "Ray Johnson" "\n"
- "Sun Microsystems Labs" "\n" "ray.johnson@eng.sun.com"},
- { 11, 24, 111, 92}, Picture {enabled, 128}
+ TCL_PATCH_LEVEL " & Tk " TK_PATCH_LEVEL "\n\n"
+ "Ray Johnson & Jim Ingham" "\n"
+ "Sun Microsystems Labs" "\n" "ray.johnson@eng.sun.com"
+ "\n" "jim.ingham@eng.sun.com"},
+ { 19, 24, 119, 92}, Picture {enabled, 128}
}
};