Overview
| Comment: | Improved effiency of polling for data by dashboard |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
804e3438ad3a0499d1b48318610486c7 |
| User & Date: | matt on 2012-02-26 19:01:31 |
| Other Links: | manifest | tags |
Context
|
2012-02-26
| ||
| 19:44 | Updated tests to push on simultaneous running check-in: 82c92c7c77 user: matt tags: trunk | |
| 19:01 | Improved effiency of polling for data by dashboard check-in: 804e3438ad user: matt tags: trunk | |
| 16:44 | Put the cached update into a transaction to speed it up check-in: f6cfd4c688 user: matt tags: trunk | |
Changes
Modified dashboard.scm from [bb3dee1654] to [3650032959].
| ︙ | |||
153 154 155 156 157 158 159 | 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 | - + + |
(c2 (map string->number (string-split color2)))
(delta (map (lambda (a b)(abs (- a b))) c1 c2)))
(null? (filter (lambda (x)(> x 3)) delta))))
;; keypatts: ( (KEY1 "abc%def")(KEY2 "%") )
(define (update-rundat runnamepatt numruns testnamepatt itemnamepatt keypatts)
(let ((modtime (file-modification-time *db-file-path*)))
|
| ︙ |