puts "Test loading of resources from different paths" puts "0027849: ResourceManager path computations fail for the folders containing dots" pload QAcommands set paths { "path" "path.with.dots" "path with spaces" "nested/dirs/path with spaces" } # key word to be saved in resource file and then checked set keyw ok foreach p $paths { set path [file join $imagedir $p] file mkdir $path set fd [open $path/TestResource w] puts $fd "test.resource : $keyw" close $fd dsetenv CSF_TestResourceDefaults $path if { [OCC27849 TestResource test.resource] != "$keyw" } { puts "Error: cannot read resource file in $path" } }