Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Make 'auto_execok START' do the Right Thing |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | core-8-4-branch |
| Files: | files | file ages | folders |
| SHA1: |
4f8e0283c6744d2e77ecd64bcb48e256 |
| User & Date: | dkf 2012-04-27 08:46:47 |
Context
|
2012-05-02
| ||
| 06:43 | TclWinCPUID now respects -fPIC compilation on 32-bit Linux check-in: 39444fd759 user: jan.nijtmans tags: core-8-4-branch | |
|
2012-04-27
| ||
| 08:49 | Make 'auto_execok START' do the Right Thing check-in: cdcff6d669 user: dkf tags: core-8-5-branch | |
| 08:46 | Make 'auto_execok START' do the Right Thing check-in: 4f8e0283c6 user: dkf tags: core-8-4-branch | |
|
2012-04-26
| ||
| 15:03 | compiler warning check-in: 64764a7fb3 user: jan.nijtmans tags: core-8-4-branch | |
Changes
Changes to ChangeLog.
1 2 3 4 5 6 7 | 2012-04-24 Jan Nijtmans <[email protected]> * generic/tclInt.decls: [Bug 3508771] load tclreg.dll in cygwin tclsh * generic/tclIntPlatDecls.h: Implement TclWinGetSockOpt, TclWinGetServByName * generic/tclStubInit.c: and TclWinCPUID for Cygwin * generic/tclUnixCompat.c: * unix/configure.in: | > > > > > | 1 2 3 4 5 6 7 8 9 10 11 12 | 2012-04-27 Donal K. Fellows <[email protected]> * library/init.tcl (auto_execok): Allow shell builtins to be detected even if they are upper-cased. 2012-04-24 Jan Nijtmans <[email protected]> * generic/tclInt.decls: [Bug 3508771] load tclreg.dll in cygwin tclsh * generic/tclIntPlatDecls.h: Implement TclWinGetSockOpt, TclWinGetServByName * generic/tclStubInit.c: and TclWinCPUID for Cygwin * generic/tclUnixCompat.c: * unix/configure.in: |
| ︙ | ︙ |
Changes to library/init.tcl.
| ︙ | ︙ | |||
576 577 578 579 580 581 582 |
if {[info exists env(PATHEXT)]} {
# Add an initial ; to have the {} extension check first.
set execExtensions [split ";$env(PATHEXT)" ";"]
} else {
set execExtensions [list {} .com .exe .bat]
}
| | | 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 |
if {[info exists env(PATHEXT)]} {
# Add an initial ; to have the {} extension check first.
set execExtensions [split ";$env(PATHEXT)" ";"]
} else {
set execExtensions [list {} .com .exe .bat]
}
if {[lsearch -exact $shellBuiltins [string tolower $name]] != -1} {
# When this is command.com for some reason on Win2K, Tcl won't
# exec it unless the case is right, which this corrects. COMSPEC
# may not point to a real file, so do the check.
set cmd $env(COMSPEC)
if {[file exists $cmd]} {
set cmd [file attributes $cmd -shortname]
}
|
| ︙ | ︙ |