diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-27 09:59:14 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-27 09:59:14 (GMT) |
commit | e1fdad425a08599ce5e492ae8087a8406c9ce268 (patch) | |
tree | 278076ffc2c807bd189758f2b54eee7a31604ee5 /tests/fileName.test | |
parent | 1df3dc0ae2488112b8d9f28bb74b73c508a11210 (diff) | |
parent | 49b6ecfb4e17876dec5c9f9edad8d5e0a44cb52c (diff) | |
download | tcl-e1fdad425a08599ce5e492ae8087a8406c9ce268.zip tcl-e1fdad425a08599ce5e492ae8087a8406c9ce268.tar.gz tcl-e1fdad425a08599ce5e492ae8087a8406c9ce268.tar.bz2 |
Merge 8.7. Go back to lowercase for POSIX err-messages
Diffstat (limited to 'tests/fileName.test')
-rw-r--r-- | tests/fileName.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/fileName.test b/tests/fileName.test index d16f86e..09662ff 100644 --- a/tests/fileName.test +++ b/tests/fileName.test @@ -1332,8 +1332,8 @@ unset globname catch {file attributes globTest/a1 -permissions 0} test filename-15.1 {unix specific globbing} {unix nonPortable} { - list [catch {glob globTest/a1/*} msg] $msg $errorCode -} {1 {couldn't read directory "globtest/a1": Permission denied} {POSIX EACCES {Permission denied}}} + string tolower [list [catch {glob globTest/a1/*} msg] $msg $errorCode] +} {1 {couldn't read directory "globtest/a1": permission denied} {posix eacces {permission denied}}} test filename-15.2 {unix specific no complain: no errors} {unix nonPortable} { glob -nocomplain globTest/a1/* } {} |