Fossil SCM
Add another test to check the value of each versionable setting after it is written.
Commit
46228ffb1f2cdb8f161d95ec2fa6b70ce6cf5a0e
Parent
b9414210cd4dea6…
1 file changed
+9
-1
+9
-1
| --- test/settings-repo.test | ||
| +++ test/settings-repo.test | ||
| @@ -215,19 +215,27 @@ | ||
| 215 | 215 | |
| 216 | 216 | test settings-before-versionable-$name { |
| 217 | 217 | [regexp -- [string map [list %name% $name] $pattern(1)] $data] |
| 218 | 218 | } |
| 219 | 219 | |
| 220 | + set value #versionable_for_$name | |
| 220 | 221 | set fileName [file join .fossil-settings $name] |
| 221 | - write_file $fileName versionable_for_$name | |
| 222 | + write_file $fileName $value | |
| 222 | 223 | |
| 223 | 224 | fossil settings $name --exact |
| 224 | 225 | set data [normalize_result] |
| 225 | 226 | |
| 226 | 227 | test settings-set-check1-versionable-$name { |
| 227 | 228 | [regexp -- [string map [list %name% $name] $pattern(5)] $data] |
| 228 | 229 | } |
| 230 | + | |
| 231 | + fossil test-th-eval --open-config "setting $name" | |
| 232 | + set data [normalize_result] | |
| 233 | + | |
| 234 | + test settings-set-check2-versionable-$name { | |
| 235 | + $data eq $value | |
| 236 | + } | |
| 229 | 237 | |
| 230 | 238 | file delete $fileName |
| 231 | 239 | |
| 232 | 240 | fossil settings $name --exact |
| 233 | 241 | set data [normalize_result] |
| 234 | 242 |
| --- test/settings-repo.test | |
| +++ test/settings-repo.test | |
| @@ -215,19 +215,27 @@ | |
| 215 | |
| 216 | test settings-before-versionable-$name { |
| 217 | [regexp -- [string map [list %name% $name] $pattern(1)] $data] |
| 218 | } |
| 219 | |
| 220 | set fileName [file join .fossil-settings $name] |
| 221 | write_file $fileName versionable_for_$name |
| 222 | |
| 223 | fossil settings $name --exact |
| 224 | set data [normalize_result] |
| 225 | |
| 226 | test settings-set-check1-versionable-$name { |
| 227 | [regexp -- [string map [list %name% $name] $pattern(5)] $data] |
| 228 | } |
| 229 | |
| 230 | file delete $fileName |
| 231 | |
| 232 | fossil settings $name --exact |
| 233 | set data [normalize_result] |
| 234 |
| --- test/settings-repo.test | |
| +++ test/settings-repo.test | |
| @@ -215,19 +215,27 @@ | |
| 215 | |
| 216 | test settings-before-versionable-$name { |
| 217 | [regexp -- [string map [list %name% $name] $pattern(1)] $data] |
| 218 | } |
| 219 | |
| 220 | set value #versionable_for_$name |
| 221 | set fileName [file join .fossil-settings $name] |
| 222 | write_file $fileName $value |
| 223 | |
| 224 | fossil settings $name --exact |
| 225 | set data [normalize_result] |
| 226 | |
| 227 | test settings-set-check1-versionable-$name { |
| 228 | [regexp -- [string map [list %name% $name] $pattern(5)] $data] |
| 229 | } |
| 230 | |
| 231 | fossil test-th-eval --open-config "setting $name" |
| 232 | set data [normalize_result] |
| 233 | |
| 234 | test settings-set-check2-versionable-$name { |
| 235 | $data eq $value |
| 236 | } |
| 237 | |
| 238 | file delete $fileName |
| 239 | |
| 240 | fossil settings $name --exact |
| 241 | set data [normalize_result] |
| 242 |