Changes In Branch v1.80-test-control-panel-improvements Through [b63f5b8379] Excluding Merge-Ins
This is equivalent to a diff from 17856ae5a8 to b63f5b8379
2024-07-01
| ||
10:20 | bundle commits for test control panel improvements Closed-Leaf check-in: 475578695e user: mrwellan tags: v1.80-test-control-panel | |
2024-06-28
| ||
12:46 | minor re-do of the run, test and meta areas Closed-Leaf check-in: 27c6b819c2 user: mrwellan tags: v1.80-test-control-panel-improvements | |
09:01 | Rearranged buttons on test control panel and added rerun-clean check-in: b63f5b8379 user: mrwellan tags: v1.80-test-control-panel-improvements | |
2024-06-21
| ||
13:06 | Merged v1.8031-dev into v1.80 but it didn't go well. Closed-Leaf check-in: a72c497e90 user: mrwellan tags: v1.80-v1.8031-dev | |
2024-06-05
| ||
18:38 | merged fork Closed-Leaf check-in: 17856ae5a8 user: mmgraham tags: v1.80 | |
18:36 | Restored homehost functions to 1.80. Set the homehost when starting dashboard or megatest -run. Abort if an attempt is made to start a server on a non-homehost. check-in: 3019408957 user: mmgraham tags: v1.80 | |
2024-05-15
| ||
00:57 | Added CSCOPTS entry used for debugging. check-in: 22593531c9 user: matt tags: v1.80 | |
Modified dashboard-tests.scm from [63a55f86f7] to [6ddb4239b1].
︙ | ︙ | |||
668 669 670 671 672 673 674 675 676 677 678 679 680 681 | (iup:attribute-set! command-text-box "VALUE" (conc "megatest -target " keystring " -runname " runname " -run -testpatt " (conc testname "/" (if (equal? item-path "") "%" item-path)) " -clean-cache" )))) (remove-test (lambda (x) (iup:attribute-set! command-text-box "VALUE" (conc "megatest -remove-runs -target " keystring " -runname " runname " -testpatt " (conc testname "/" (if (equal? item-path "") "%" | > > > > > > > > > | 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 | (iup:attribute-set! command-text-box "VALUE" (conc "megatest -target " keystring " -runname " runname " -run -testpatt " (conc testname "/" (if (equal? item-path "") "%" item-path)) " -clean-cache" )))) (rerun-clean (lambda (x) (iup:attribute-set! command-text-box "VALUE" (conc "megatest -target " keystring " -runname " runname " -rerun-clean -testpatt " (conc testname "/" (if (equal? item-path "") "%" item-path)) " -clean-cache" )))) (remove-test (lambda (x) (iup:attribute-set! command-text-box "VALUE" (conc "megatest -remove-runs -target " keystring " -runname " runname " -testpatt " (conc testname "/" (if (equal? item-path "") "%" |
︙ | ︙ | |||
728 729 730 731 732 733 734 | (test-meta-panel testmeta store-meta)) (iup:hbox (host-info-panel testdat store-label) (submegatest-panel dbstruct keydat testdat runname testconfig)) ;; The controls (iup:frame #:title "Actions" (iup:vbox | | | > > | > > > > > | > | < | > > > > | | > | 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 770 771 | (test-meta-panel testmeta store-meta)) (iup:hbox (host-info-panel testdat store-label) (submegatest-panel dbstruct keydat testdat runname testconfig)) ;; The controls (iup:frame #:title "Actions" (iup:vbox (iup:hbox (iup:frame #:title "Immediate" (iup:hbox (iup:button "Start Xterm" #:action xterm #:size "80x") (iup:button "CleanRunExecute!" #:action clean-run-execute #:size "80x") (iup:button "View Log" #:action viewlog #:size "80x"))) (iup:frame #:title "Command line" (iup:hbox (iup:button "Run Test" #:action run-test #:size "80x") (iup:button "Rerun-clean" #:action rerun-clean #:size "80x") (iup:button "Clean Test" #:action remove-test #:size "80x") (iup:button "Kill All Jobs" #:action kill-jobs #:size "80x"))) (iup:label "" #:expand "HORIZONTAL") (iup:frame #:title "Other" (iup:hbox ;; (iup:button "Archive Test" #:action archive-test #:size "80x") (iup:button "Close" #:action (lambda (x)(exit)) #:size "80x") ))) (apply iup:hbox (list command-text-box command-launch-button)))) (set-fields-panel dbstruct run-id test-id testdat) (let ((tabs (iup:tabs ;; Replace here with matrix |
︙ | ︙ |