Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | merge/reintegrate test-cases from bug-9e6b569963 |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | sebres-bug-9e6b569963-8-5-branch |
| Files: | files | file ages | folders |
| SHA3-256: |
617e292a6961e82c93ed0008bb211e43 |
| User & Date: | sebres 2018-05-25 10:04:01 |
Context
|
2018-05-25
| ||
| 15:04 | optimized winapi-stubs loading (8.5th only); if user name specified without domain and equals the cu... check-in: 19abe5efa2 user: sebres tags: sebres-bug-9e6b569963-8-5-branch | |
| 10:04 | merge/reintegrate test-cases from bug-9e6b569963 check-in: 617e292a69 user: sebres tags: sebres-bug-9e6b569963-8-5-branch | |
|
2018-05-24
| ||
| 20:51 | Remove test filesystem-1.30.3, this is unstestable check-in: 88b6a0b3db user: fvogel tags: bug-9e6b569963 | |
| 20:49 | [9e6b569963] win: if user specified without domain (and local user was not found), try to resolve us... check-in: d6a73c524c user: sebres tags: sebres-bug-9e6b569963-8-5-branch | |
Changes
Changes to tests/fileSystem.test.
264 265 266 267 268 269 270 271 272 273 274 275 276 277 |
file delete -force [file join dir.dir dirinside.link]
removeFile [file join dir.dir inside.file]
removeDirectory [file join dir.dir dirinside.dir]
removeDirectory dir.dir
test filesystem-1.30 {normalisation of nonexistent user} {
list [catch {file normalize ~noonewiththisname} err] $err
} {1 {user "noonewiththisname" doesn't exist}}
test filesystem-1.31 {link normalisation: link near filesystem root} {testsetplatform} {
testsetplatform unix
file normalize /foo/../bar
} {/bar}
test filesystem-1.32 {link normalisation: link near filesystem root} {testsetplatform} {
testsetplatform unix
file normalize /../bar
|
> > > > > > |
264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 |
file delete -force [file join dir.dir dirinside.link]
removeFile [file join dir.dir inside.file]
removeDirectory [file join dir.dir dirinside.dir]
removeDirectory dir.dir
test filesystem-1.30 {normalisation of nonexistent user} {
list [catch {file normalize ~noonewiththisname} err] $err
} {1 {user "noonewiththisname" doesn't exist}}
test filesystem-1.30.1 {normalisation of existing user} -body {
catch {file normalize ~$::tcl_platform(user)}
} -result {0}
test filesystem-1.30.2 {normalisation of nonexistent user specified as [email protected]} -body {
file normalize [email protected]
} -returnCodes error -result {user "[email protected]" doesn't exist}
test filesystem-1.31 {link normalisation: link near filesystem root} {testsetplatform} {
testsetplatform unix
file normalize /foo/../bar
} {/bar}
test filesystem-1.32 {link normalisation: link near filesystem root} {testsetplatform} {
testsetplatform unix
file normalize /../bar
|