Differences From Artifact [a8322f10a6]:
- File dashboard.scm — part of check-in [0f8bb62316] at 2013-11-02 11:50:49 on branch v1.55 — Minimised data transferred on dashboard updates (user: matt, size: 56863) [annotate] [blame] [check-ins using] [more...]
To Artifact [18a5f67c75]:
- File dashboard.scm — part of check-in [158702d7aa] at 2014-03-27 11:13:20 on branch sqlite-trials — Tweaked timeouts and added more agressive exception handling to sqlite3 calls. Also cd to MT_RUN_AREA_HOME in dashboard if run in a test enviroment (user: mrwellan, size: 56979) [annotate] [blame] [check-ins using] [more...]
| ︙ | |||
171 172 173 174 175 176 177 178 179 180 181 182 183 184 | 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 | + + |
(define uidat #f)
(define-inline (dboard:uidat-get-keycol vec)(vector-ref vec 0))
(define-inline (dboard:uidat-get-lftcol vec)(vector-ref vec 1))
(define-inline (dboard:uidat-get-header vec)(vector-ref vec 2))
(define-inline (dboard:uidat-get-runsvec vec)(vector-ref vec 3))
(if (get-environment-variable "MT_RUN_AREA_HOME")(change-directory (get-environment-variable "MT_RUN_AREA_HOME")))
(define (message-window msg)
(iup:show
(iup:dialog
(iup:vbox
(iup:label msg #:margin "40x40")))))
|
| ︙ |