Fossil SCM
Test amend-tag-2.2 expects a case insensitive sorted list of tags since [3500dbfd84].
Commit
3a463e8f1279731b198fd320fc3adae61f882043ab096afd4c05233349723eb4
Parent
f5d79188eabe273…
1 file changed
+3
-1
+3
-1
| --- test/amend.test | ||
| +++ test/amend.test | ||
| @@ -306,13 +306,15 @@ | ||
| 306 | 306 | lappend tags -tag $tag |
| 307 | 307 | lappend cancels -cancel $tag |
| 308 | 308 | } |
| 309 | 309 | foreach res $result { |
| 310 | 310 | append t1exp ", $res" |
| 311 | - append t2exp "sym-$res*" | |
| 312 | 311 | append t3exp "Add*tag*\"$res\".*" |
| 313 | 312 | append t5exp "Cancel*tag*\"$res\".*" |
| 313 | + } | |
| 314 | + foreach res [lsort -nocase $result] { | |
| 315 | + append t2exp "sym-$res*" | |
| 314 | 316 | } |
| 315 | 317 | eval fossil amend $HASH $tags |
| 316 | 318 | test amend-tag-$tc.1 {[string match "*hash:*$HASH*tags:*$t1exp*" $RESULT]} |
| 317 | 319 | fossil tag ls --raw $HASH |
| 318 | 320 | test amend-tag-$tc.2 {[string match $t2exp $RESULT]} |
| 319 | 321 |
| --- test/amend.test | |
| +++ test/amend.test | |
| @@ -306,13 +306,15 @@ | |
| 306 | lappend tags -tag $tag |
| 307 | lappend cancels -cancel $tag |
| 308 | } |
| 309 | foreach res $result { |
| 310 | append t1exp ", $res" |
| 311 | append t2exp "sym-$res*" |
| 312 | append t3exp "Add*tag*\"$res\".*" |
| 313 | append t5exp "Cancel*tag*\"$res\".*" |
| 314 | } |
| 315 | eval fossil amend $HASH $tags |
| 316 | test amend-tag-$tc.1 {[string match "*hash:*$HASH*tags:*$t1exp*" $RESULT]} |
| 317 | fossil tag ls --raw $HASH |
| 318 | test amend-tag-$tc.2 {[string match $t2exp $RESULT]} |
| 319 |
| --- test/amend.test | |
| +++ test/amend.test | |
| @@ -306,13 +306,15 @@ | |
| 306 | lappend tags -tag $tag |
| 307 | lappend cancels -cancel $tag |
| 308 | } |
| 309 | foreach res $result { |
| 310 | append t1exp ", $res" |
| 311 | append t3exp "Add*tag*\"$res\".*" |
| 312 | append t5exp "Cancel*tag*\"$res\".*" |
| 313 | } |
| 314 | foreach res [lsort -nocase $result] { |
| 315 | append t2exp "sym-$res*" |
| 316 | } |
| 317 | eval fossil amend $HASH $tags |
| 318 | test amend-tag-$tc.1 {[string match "*hash:*$HASH*tags:*$t1exp*" $RESULT]} |
| 319 | fossil tag ls --raw $HASH |
| 320 | test amend-tag-$tc.2 {[string match $t2exp $RESULT]} |
| 321 |