Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | [Bug 3532186]: pkgIndex.tcl file complexity that's unwarranted: Test for ::argv variable before trying to use it |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | core-8-4-branch |
| Files: | files | file ages | folders |
| SHA1: |
0ba8a8f523448a89e6f6150a11840c09 |
| User & Date: | jan.nijtmans 2012-07-08 08:17:10 |
Context
|
2012-07-17
| ||
| 13:10 | [Bug 3544932]: Visual studio compiler check fails check-in: f277df6f user: jan.nijtmans tags: core-8-4-branch | |
|
2012-07-08
| ||
| 08:19 | [Bug 3532186]: pkgIndex.tcl file complexity that's unwarranted: Test for ::argv variable before trying to use it check-in: d5b82649 user: jan.nijtmans tags: core-8-5-branch | |
| 08:17 | [Bug 3532186]: pkgIndex.tcl file complexity that's unwarranted: Test for ::argv variable before trying to use it check-in: 0ba8a8f5 user: jan.nijtmans tags: core-8-4-branch | |
| 04:29 | [Bug 3541305]: Xfree/Xsync... should not be macros check-in: 971cdf51 user: jan.nijtmans tags: core-8-4-branch | |
Changes
Changes to unix/Makefile.in.
| ︙ | ︙ | |||
662 663 664 665 666 667 668 |
rm -f "$(PKG_INDEX)"; \
(\
relative=`echo | awk '{ORS=" "; split("$(TK_PKG_DIR)",a,"/"); for (f in a) {print ".."}}'`;\
echo "if {[package vcompare [package provide Tcl] $(TCLVERSION)] != 0} { return }";\
if test "x$(DLL_INSTALL_DIR)" != "x$(BIN_INSTALL_DIR)"; then \
echo "package ifneeded Tk $(MAJOR_VERSION).$(MINOR_VERSION) [list load [file join \$$dir $${relative}$(TK_LIB_FILE)] Tk]";\
else \
| | | | 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 |
rm -f "$(PKG_INDEX)"; \
(\
relative=`echo | awk '{ORS=" "; split("$(TK_PKG_DIR)",a,"/"); for (f in a) {print ".."}}'`;\
echo "if {[package vcompare [package provide Tcl] $(TCLVERSION)] != 0} { return }";\
if test "x$(DLL_INSTALL_DIR)" != "x$(BIN_INSTALL_DIR)"; then \
echo "package ifneeded Tk $(MAJOR_VERSION).$(MINOR_VERSION) [list load [file join \$$dir $${relative}$(TK_LIB_FILE)] Tk]";\
else \
echo "if {(\$$::tcl_platform(platform) eq \"unix\") && ([info exists ::env(DISPLAY)]";\
echo " || ([info exists ::argv] && [lsearch -exact \$$::argv -display] > -1))} {";\
echo " package ifneeded Tk $(MAJOR_VERSION).$(MINOR_VERSION) [list load [file join \$$dir $${relative}.. bin $(TK_LIB_FILE)] Tk]";\
echo "} else {";\
echo " package ifneeded Tk $(MAJOR_VERSION).$(MINOR_VERSION) [list load [file join \$$dir $${relative}.. bin tk${MAJOR_VERSION}${MINOR_VERSION}.dll] Tk]";\
echo "}";\
fi \
) > "$(PKG_INDEX)"; \
fi
|
| ︙ | ︙ |
Changes to win/Makefile.in.
| ︙ | ︙ | |||
431 432 433 434 435 436 437 |
$(COPY) $$i "$(BIN_INSTALL_DIR)"; \
fi; \
done
@echo "Creating package index $(PKG_INDEX)";
@$(RM) $(PKG_INDEX);
@(\
echo "if {[package vcompare [package provide Tcl] $(TCLVERSION)] != 0} { return }";\
| | | | 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 |
$(COPY) $$i "$(BIN_INSTALL_DIR)"; \
fi; \
done
@echo "Creating package index $(PKG_INDEX)";
@$(RM) $(PKG_INDEX);
@(\
echo "if {[package vcompare [package provide Tcl] $(TCLVERSION)] != 0} { return }";\
echo "if {(\$$::tcl_platform(platform) eq \"unix\") && ([info exists ::env(DISPLAY)]";\
echo " || ([info exists ::argv] && [lsearch -exact \$$::argv -display] > -1))} {";\
echo " package ifneeded Tk $(VERSION) [list load [file join \$$dir .. .. bin libtk$(VERSION).dll] Tk]";\
echo "} else {";\
echo " package ifneeded Tk $(VERSION) [list load [file join \$$dir .. .. bin $(TK_DLL_FILE)] Tk]";\
echo "}";\
) > $(PKG_INDEX);
@for i in tkConfig.sh $(TK_LIB_FILE) $(TK_STUB_LIB_FILE); \
do \
|
| ︙ | ︙ |