Megatest

Check-in [6555418e4b]
Login
Overview
Comment:fixed bug with loading area from Matt
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.63-readonly
Files: files | file ages | folders
SHA1: 6555418e4b71c9024f2f94b63b9100f912291208
User & Date: bjbarcla on 2017-02-21 16:52:30
Other Links: branch diff | manifest | tags
Context
2017-02-21
17:10
fixed bug with loading area from Matt check-in: 8caaed5094 user: bjbarcla tags: v1.63-readonly
16:52
fixed bug with loading area from Matt check-in: 6555418e4b user: bjbarcla tags: v1.63-readonly
16:49
fixed bug with loading area from Matt check-in: 044051d315 user: bjbarcla tags: v1.63-readonly
Changes

Modified dashboard.scm from [3c2c4d9017] to [ad4ea3ee41].

99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
(if (args:get-arg "-h")
    (begin
      (print help)
      (exit)))

(if (not (common:on-homehost?))
    (begin
      (debug:print 0 *default-log-port* "ERROR: Current policy requires running dashboard on homehost: " (common:get-homehost))))
    
;; TODO: Move this inside (main)
;;
(if (not (launch:setup))
    (begin
      (print "Failed to find megatest.config, exiting") 
      (exit 1)))







|







99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
(if (args:get-arg "-h")
    (begin
      (print help)
      (exit)))

(if (not (common:on-homehost?))
    (begin
      (debug:print 0 *default-log-port* "WARNING: Current policy requires running dashboard on homehost: " (common:get-homehost))))
    
;; TODO: Move this inside (main)
;;
(if (not (launch:setup))
    (begin
      (print "Failed to find megatest.config, exiting") 
      (exit 1)))