Overview
| Comment: | made yougest-db error message more useful |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.63 |
| Files: | files | file ages | folders |
| SHA1: |
e58c0e3fb7f0cf6e2c1b93c4404c3169 |
| User & Date: | bjbarcla on 2017-01-25 17:11:14 |
| Other Links: | branch diff | manifest | tags |
Context
|
2017-02-02
| ||
| 17:41 | Merged server-log-handshaking to v1.63 check-in: 9d4d98bcd5 user: mrwellan tags: v1.63 | |
| 14:52 | added basic html genration check-in: ae20a8a286 user: pjhatwal tags: html-gen | |
|
2017-01-31
| ||
| 17:47 | completed diff report feature check-in: 118224962b user: bjbarcla tags: v1.63-xor-report | |
|
2017-01-30
| ||
| 12:23 | added update on conflict insert for pg, synced with latest v1.63 check-in: ad8b9df640 user: srehman tags: v1.63-configdbsync | |
|
2017-01-25
| ||
| 22:02 | Stripped out nearly all server management stuff related to monitor.db server tables. partially replaced with log file based handshaking check-in: 6d32c79c1e user: matt tags: server-log-handshaking | |
| 17:37 | Automated merge of v1.63/e58c0e3fb7/integ into integ-home check-in: 6e5448c9cf user: matt tags: integ-home | |
| 17:11 | made yougest-db error message more useful check-in: e58c0e3fb7 user: bjbarcla tags: v1.63 | |
|
2017-01-23
| ||
| 13:28 | Changed num tests to draw per cycle to 200, bumped version to v1.6305 check-in: a03bdb5581 user: mrwellan tags: v1.63, v1.6305 | |
Changes
Modified dashboard.scm from [ff388ff4d0] to [29cdcf21f3].
| ︙ | ︙ | |||
2708 2709 2710 2711 2712 2713 2714 | ;; Force creation of the db in case it isn't already there. (tasks:open-db) (define (dashboard:get-youngest-run-db-mod-time dbdir) (handle-exceptions exn (begin | | | 2708 2709 2710 2711 2712 2713 2714 2715 2716 2717 2718 2719 2720 2721 2722 |
;; Force creation of the db in case it isn't already there.
(tasks:open-db)
(define (dashboard:get-youngest-run-db-mod-time dbdir)
(handle-exceptions
exn
(begin
(debug:print 0 *default-log-port* "WARNING: error in accessing databases in get-youngest-run-db-mod-time: " ((condition-property-accessor 'exn 'message) exn) " db-dir="dbdir)
(current-seconds)) ;; something went wrong - just print an error and return current-seconds
(common:max (map (lambda (filen)
(file-modification-time filen))
(glob (conc dbdir "/*.db*"))))))
(define (dashboard:monitor-changed? commondat tabdat)
(let* ((run-update-time (current-seconds))
|
| ︙ | ︙ |