Megatest

Check-in [a38b157d75]
Login
Overview
Comment:Added re-run of test to rhb menu
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.61
Files: files | file ages | folders
SHA1: a38b157d75ccab758dfb06b53d3d78fc18a65df9
User & Date: matt on 2016-06-30 04:57:24
Other Links: branch diff | manifest | tags
Context
2016-06-30
23:49
Made the LH column controls independent for each tab check-in: c4ce2f7187 user: matt tags: v1.61
04:57
Added re-run of test to rhb menu check-in: a38b157d75 user: matt tags: v1.61
04:50
Added rerun to rhb menu check-in: 61dfefd369 user: matt tags: v1.61
Changes

Modified dashboard.scm from [8faf005e26] to [52da789fe9].

1887
1888
1889
1890
1891
1892
1893
1894
1895
1896
1897
1898
1899









1900
1901
1902
1903
1904
1905
1906
1887
1888
1889
1890
1891
1892
1893

1894
1895
1896
1897
1898
1899
1900
1901
1902
1903
1904
1905
1906
1907
1908
1909
1910
1911
1912
1913
1914







-





+
+
+
+
+
+
+
+
+







							      #:action
							      (lambda (obj)
								(common:run-a-command
								 (conc "megatest -run -target " target
								       " -runname " runname
								       " -testpatt " testpatt
								       " -preclean -clean-cache")
								 ;; (print "Rerun")
								 )))))
							   (iup:menu-item
							    "Test"
							    (iup:menu 
							     (iup:menu-item
							      (conc "Rerun " test-name)
							      #:action
							      (lambda (obj)
								(common:run-a-command
								 (conc "megatest -run -target " target
								       " -runname " runname
								       " -testpatt " test-name
								       " -preclean -clean-cache"))))
							     (iup:menu-item
							      "Start xterm"
							      #:action
							      (lambda (obj)
								(let* ((cmd (conc toolpath " -xterm " run-id "," test-id "&")))
								  (system cmd))))
							     (iup:menu-item
							      "Edit testconfig"