Fossil SCM

Some coding style corrections in the TH1 tests.

mistachkin 2016-08-18 01:50 UTC trunk
Commit 46e92c25e09d198131175b32d3bf3ed02bed322f
Parent 5ea2a4fb075cf02…
1 file changed +28 -16
~ test/th1.test
M test/th1.test
+28 -16
--- test/th1.test
+++ test/th1.test
@@ -559,60 +559,72 @@
559559
 foreach perm [list a b c d e f g h i j k l m n o p q r s t u v w x y z] {
560560
 if {$perm eq "u"} continue; # NOTE: Skip "reader" meta-permission.
561561
 if {$perm eq "v"} continue; # NOTE: Skip "developer" meta-permission.
562562
563563
 fossil test-th-eval "anycap $perm"
564
- test th1-anycap-no-$perm {$RESULT eq {0}}
564
+ test th1-anycap-no-$perm-1 {$RESULT eq {0}}
565565
566566
 fossil test-th-eval "hascap $perm"
567
- test th1-hascap-no-$perm {$RESULT eq {0}}
567
+ test th1-hascap-no-$perm-1 {$RESULT eq {0}}
568568
569569
 fossil test-th-eval "anoncap $perm"
570
- test th1-anoncap-no-$perm {$RESULT eq {0}}
570
+ test th1-anoncap-no-$perm-1 {$RESULT eq {0}}
571571
572572
 run_in_checkout {
573573
 fossil test-th-eval --set-user-caps "anycap $perm"
574
- test th1-anycap-yes-$perm {$RESULT eq {1}}
574
+ test th1-anycap-yes-$perm-1 {$RESULT eq {1}}
575575
576576
 fossil test-th-eval --set-user-caps "hascap $perm"
577
- test th1-hascap-yes-$perm {$RESULT eq {1}}
577
+ test th1-hascap-yes-$perm-1 {$RESULT eq {1}}
578578
579579
 fossil test-th-eval --set-anon-caps "anoncap $perm"
580
- test th1-anoncap-yes-$perm {$RESULT eq {1}}
580
+ test th1-anoncap-yes-$perm-1 {$RESULT eq {1}}
581581
 }
582582
 }
583
+
584
+###############################################################################
583585
584586
 fossil test-th-eval "anycap oh"
585
-test th1-anycap-no-multiple {$RESULT eq {0}}
587
+test th1-anycap-no-multiple-1 {$RESULT eq {0}}
588
+
589
+###############################################################################
586590
587591
 fossil test-th-eval "hascap oh"
588
-test th1-hascap-no-multiple1 {$RESULT eq {0}}
592
+test th1-hascap-no-multiple-1 {$RESULT eq {0}}
593
+
594
+###############################################################################
589595
590596
 fossil test-th-eval "hascap o h"
591
-test th1-hascap-no-multiple2 {$RESULT eq {0}}
597
+test th1-hascap-no-multiple-2 {$RESULT eq {0}}
598
+
599
+###############################################################################
592600
593601
 fossil test-th-eval "anoncap oh"
594
-test th1-anoncap-no-multiple1 {$RESULT eq {0}}
602
+test th1-anoncap-no-multiple-1 {$RESULT eq {0}}
603
+
604
+###############################################################################
595605
596606
 fossil test-th-eval "anoncap o h"
597
-test th1-anoncap-no-multiple2 {$RESULT eq {0}}
607
+test th1-anoncap-no-multiple-2 {$RESULT eq {0}}
608
+
609
+###############################################################################
598610
599611
 run_in_checkout {
600612
 fossil test-th-eval --set-user-caps "anycap oh"
601
- test th1-anycap-yes-multiple1 {$RESULT eq {1}}
613
+ test th1-anycap-yes-multiple-1 {$RESULT eq {1}}
602614
603615
 fossil test-th-eval --set-user-caps "hascap oh"
604
- test th1-hascap-yes-multiple1 {$RESULT eq {1}}
616
+ test th1-hascap-yes-multiple-1 {$RESULT eq {1}}
605617
606618
 fossil test-th-eval --set-user-caps "hascap o h"
607
- test th1-hascap-yes-multiple2 {$RESULT eq {1}}
619
+ test th1-hascap-yes-multiple-2 {$RESULT eq {1}}
608620
609621
 fossil test-th-eval --set-anon-caps "anoncap oh"
610
- test th1-anoncap-yes-multiple1 {$RESULT eq {1}}
622
+ test th1-anoncap-yes-multiple-1 {$RESULT eq {1}}
611623
612624
 fossil test-th-eval --set-anon-caps "anoncap o h"
613
- test th1-anoncap-yes-multiple2 {$RESULT eq {1}}
625
+ test th1-anoncap-yes-multiple-2 {$RESULT eq {1}}
614626
 }
615627
616628
 ###############################################################################
617629
618630
 run_in_checkout {
619631
--- test/th1.test
+++ test/th1.test
@@ -559,60 +559,72 @@
559 foreach perm [list a b c d e f g h i j k l m n o p q r s t u v w x y z] {
560 if {$perm eq "u"} continue; # NOTE: Skip "reader" meta-permission.
561 if {$perm eq "v"} continue; # NOTE: Skip "developer" meta-permission.
562
563 fossil test-th-eval "anycap $perm"
564 test th1-anycap-no-$perm {$RESULT eq {0}}
565
566 fossil test-th-eval "hascap $perm"
567 test th1-hascap-no-$perm {$RESULT eq {0}}
568
569 fossil test-th-eval "anoncap $perm"
570 test th1-anoncap-no-$perm {$RESULT eq {0}}
571
572 run_in_checkout {
573 fossil test-th-eval --set-user-caps "anycap $perm"
574 test th1-anycap-yes-$perm {$RESULT eq {1}}
575
576 fossil test-th-eval --set-user-caps "hascap $perm"
577 test th1-hascap-yes-$perm {$RESULT eq {1}}
578
579 fossil test-th-eval --set-anon-caps "anoncap $perm"
580 test th1-anoncap-yes-$perm {$RESULT eq {1}}
581 }
582 }
 
 
583
584 fossil test-th-eval "anycap oh"
585 test th1-anycap-no-multiple {$RESULT eq {0}}
 
 
586
587 fossil test-th-eval "hascap oh"
588 test th1-hascap-no-multiple1 {$RESULT eq {0}}
 
 
589
590 fossil test-th-eval "hascap o h"
591 test th1-hascap-no-multiple2 {$RESULT eq {0}}
 
 
592
593 fossil test-th-eval "anoncap oh"
594 test th1-anoncap-no-multiple1 {$RESULT eq {0}}
 
 
595
596 fossil test-th-eval "anoncap o h"
597 test th1-anoncap-no-multiple2 {$RESULT eq {0}}
 
 
598
599 run_in_checkout {
600 fossil test-th-eval --set-user-caps "anycap oh"
601 test th1-anycap-yes-multiple1 {$RESULT eq {1}}
602
603 fossil test-th-eval --set-user-caps "hascap oh"
604 test th1-hascap-yes-multiple1 {$RESULT eq {1}}
605
606 fossil test-th-eval --set-user-caps "hascap o h"
607 test th1-hascap-yes-multiple2 {$RESULT eq {1}}
608
609 fossil test-th-eval --set-anon-caps "anoncap oh"
610 test th1-anoncap-yes-multiple1 {$RESULT eq {1}}
611
612 fossil test-th-eval --set-anon-caps "anoncap o h"
613 test th1-anoncap-yes-multiple2 {$RESULT eq {1}}
614 }
615
616 ###############################################################################
617
618 run_in_checkout {
619
--- test/th1.test
+++ test/th1.test
@@ -559,60 +559,72 @@
559 foreach perm [list a b c d e f g h i j k l m n o p q r s t u v w x y z] {
560 if {$perm eq "u"} continue; # NOTE: Skip "reader" meta-permission.
561 if {$perm eq "v"} continue; # NOTE: Skip "developer" meta-permission.
562
563 fossil test-th-eval "anycap $perm"
564 test th1-anycap-no-$perm-1 {$RESULT eq {0}}
565
566 fossil test-th-eval "hascap $perm"
567 test th1-hascap-no-$perm-1 {$RESULT eq {0}}
568
569 fossil test-th-eval "anoncap $perm"
570 test th1-anoncap-no-$perm-1 {$RESULT eq {0}}
571
572 run_in_checkout {
573 fossil test-th-eval --set-user-caps "anycap $perm"
574 test th1-anycap-yes-$perm-1 {$RESULT eq {1}}
575
576 fossil test-th-eval --set-user-caps "hascap $perm"
577 test th1-hascap-yes-$perm-1 {$RESULT eq {1}}
578
579 fossil test-th-eval --set-anon-caps "anoncap $perm"
580 test th1-anoncap-yes-$perm-1 {$RESULT eq {1}}
581 }
582 }
583
584 ###############################################################################
585
586 fossil test-th-eval "anycap oh"
587 test th1-anycap-no-multiple-1 {$RESULT eq {0}}
588
589 ###############################################################################
590
591 fossil test-th-eval "hascap oh"
592 test th1-hascap-no-multiple-1 {$RESULT eq {0}}
593
594 ###############################################################################
595
596 fossil test-th-eval "hascap o h"
597 test th1-hascap-no-multiple-2 {$RESULT eq {0}}
598
599 ###############################################################################
600
601 fossil test-th-eval "anoncap oh"
602 test th1-anoncap-no-multiple-1 {$RESULT eq {0}}
603
604 ###############################################################################
605
606 fossil test-th-eval "anoncap o h"
607 test th1-anoncap-no-multiple-2 {$RESULT eq {0}}
608
609 ###############################################################################
610
611 run_in_checkout {
612 fossil test-th-eval --set-user-caps "anycap oh"
613 test th1-anycap-yes-multiple-1 {$RESULT eq {1}}
614
615 fossil test-th-eval --set-user-caps "hascap oh"
616 test th1-hascap-yes-multiple-1 {$RESULT eq {1}}
617
618 fossil test-th-eval --set-user-caps "hascap o h"
619 test th1-hascap-yes-multiple-2 {$RESULT eq {1}}
620
621 fossil test-th-eval --set-anon-caps "anoncap oh"
622 test th1-anoncap-yes-multiple-1 {$RESULT eq {1}}
623
624 fossil test-th-eval --set-anon-caps "anoncap o h"
625 test th1-anoncap-yes-multiple-2 {$RESULT eq {1}}
626 }
627
628 ###############################################################################
629
630 run_in_checkout {
631

Keyboard Shortcuts

Open search /
Next entry (timeline) j
Previous entry (timeline) k
Open focused entry Enter
Show this help ?
Toggle theme Top nav button