summaryrefslogtreecommitdiffstats
path: root/mac/tclMacTclCode.r
diff options
context:
space:
mode:
authordas <das>2001-12-27 22:46:12 (GMT)
committerdas <das>2001-12-27 22:46:12 (GMT)
commitd279f3a31ab8738baedcb41295db291eb30ab96d (patch)
treea7d7b1a3c9226183e19b18f421be4f6a4e15a52c /mac/tclMacTclCode.r
parent275fcdde3fa7cacfabb89aaa4b4f6e9c513f217b (diff)
downloadtcl-d279f3a31ab8738baedcb41295db291eb30ab96d.zip
tcl-d279f3a31ab8738baedcb41295db291eb30ab96d.tar.gz
tcl-d279f3a31ab8738baedcb41295db291eb30ab96d.tar.bz2
* mac/tclMacInit.c:
* mac/tclMacTclCode.r: synced up tclInit features to unix/win: implemented TclSetPreInitScript support, use of existing tclInit proc if defined, check of default encoding dir if set. Changed script library resource names to lowercase (i.e. same as corresponding files). Used Tcl_JoinPath instead of string append. Check that system encoding could be loaded before utf translating the LibraryPath. * mac/tclMacApplication.r: * mac/tclMacLibrary.r: * mac/tclMacOSA.r: * mac/tclMacResource.r: minor version resources cleanup
Diffstat (limited to 'mac/tclMacTclCode.r')
-rw-r--r--mac/tclMacTclCode.r12
1 files changed, 6 insertions, 6 deletions
diff --git a/mac/tclMacTclCode.r b/mac/tclMacTclCode.r
index c3a0c22..13b23e2 100644
--- a/mac/tclMacTclCode.r
+++ b/mac/tclMacTclCode.r
@@ -29,9 +29,9 @@
* will load the TEXT resource named "Init".
*/
-read 'TEXT' (TCL_LIBRARY_RESOURCES, "Init", purgeable) "::library:init.tcl";
-read 'TEXT' (TCL_LIBRARY_RESOURCES + 1, "Auto", purgeable) "::library:auto.tcl";
-read 'TEXT' (TCL_LIBRARY_RESOURCES + 2, "Package", purgeable,preload) "::library:package.tcl";
-read 'TEXT' (TCL_LIBRARY_RESOURCES + 3, "History", purgeable) "::library:history.tcl";
-read 'TEXT' (TCL_LIBRARY_RESOURCES + 4, "Word", purgeable,preload) "::library:word.tcl";
-read 'TEXT' (TCL_LIBRARY_RESOURCES + 5, "Parray", purgeable,preload) "::library:parray.tcl";
+read 'TEXT' (TCL_LIBRARY_RESOURCES, "init", purgeable) "::library:init.tcl";
+read 'TEXT' (TCL_LIBRARY_RESOURCES + 1, "auto", purgeable) "::library:auto.tcl";
+read 'TEXT' (TCL_LIBRARY_RESOURCES + 2, "package", purgeable,preload) "::library:package.tcl";
+read 'TEXT' (TCL_LIBRARY_RESOURCES + 3, "history", purgeable) "::library:history.tcl";
+read 'TEXT' (TCL_LIBRARY_RESOURCES + 4, "word", purgeable,preload) "::library:word.tcl";
+read 'TEXT' (TCL_LIBRARY_RESOURCES + 5, "parray", purgeable,preload) "::library:parray.tcl";