Megatest

Changes On Branch 3a2f81e917b70aac
Login

Changes In Branch v1.6408a Excluding Merge-Ins

This is equivalent to a diff from 30dc610005 to 3a2f81e917

2017-05-03
00:54
Merged fix for RH 5.11 lack of support for detachbox. Changed default launch delay to 0. It is too irritating to wait. check-in: 293d28e2af user: matt tags: v1.64
2017-05-02
14:29
Updated 5.8 to 5.11 to maintain correct version naming Leaf check-in: 3a2f81e917 user: jmoon18 tags: v1.6408a
2017-04-29
07:40
Added automatic target adjustment on running -cleanup-db. Calls to db:multi-db-sync will do the passed in operations in the order provided. Force an exit for some operations if not on homehost by looking at switches/parameters. check-in: 50414b8e0e user: matt tags: v1.64
2017-04-26
23:59
Merged changes from v1.64. check-in: 657b6ecb35 user: matt tags: v1.65
17:27
Merged in some dashboard layout updates and purple ABORT check-in: 30dc610005 user: mrwellan tags: v1.64, v1.6408
16:47
No items defined to be considered a warning check-in: 3071dcaae4 user: ritikaag tags: v1.64
2017-04-25
14:19
Added detachablity to trees in dashboard so they can be detached and deleted. Closed-Leaf check-in: 08a1393c61 user: mrwellan tags: v1.64-dashboard

Modified dashboard.scm from [82b3909808] to [16b773eafe].

83
84
85
86
87
88
89

90
91
92
93
94
95
96
97
98
99
100
101
102
103



104
105
106
107
108
109
110
			"-guimonitor"
			"-main"
			"-v"
			"-q"
			"-use-db-cache"
			"-skip-version-check"
			"-repl"

			)
		 args:arg-hash
		 0))

(if (not (null? remargs))
    (begin
      (print "Unrecognised arguments: " (string-intersperse remargs " "))
      (exit)))

(if (args:get-arg "-h")
    (begin
      (print help)
      (exit)))




;; TODO: Move this inside (main)
;;
(if (not (launch:setup))
    (begin
      (print "Failed to find megatest.config, exiting") 
      (exit 1)))








>














>
>
>







83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
			"-guimonitor"
			"-main"
			"-v"
			"-q"
			"-use-db-cache"
			"-skip-version-check"
			"-repl"
                        "-rh5.11" ;; fix to allow running on rh5.11
			)
		 args:arg-hash
		 0))

(if (not (null? remargs))
    (begin
      (print "Unrecognised arguments: " (string-intersperse remargs " "))
      (exit)))

(if (args:get-arg "-h")
    (begin
      (print help)
      (exit)))

(if (args:get-arg "-rh5.11")
    (set! iup:detachbox iup:vbox))

;; TODO: Move this inside (main)
;;
(if (not (launch:setup))
    (begin
      (print "Failed to find megatest.config, exiting") 
      (exit 1)))