Overview
Comment: | fixed bug with waive dialog in dashboard |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | v1.63-readonly |
Files: | files | file ages | folders |
SHA1: |
bc5d8b0c1b386092668834722aa15f3f |
User & Date: | bjbarcla on 2017-02-21 22:18:27 |
Other Links: | branch diff | manifest | tags |
Context
2017-02-21
| ||
23:01 | prime tmpdb even if readonly check-in: e7ef30d3e1 user: bjbarcla tags: v1.63-readonly | |
22:18 | fixed bug with waive dialog in dashboard check-in: bc5d8b0c1b user: bjbarcla tags: v1.63-readonly | |
21:44 | fixed readonly watchdog check-in: 8c83a08f46 user: bjbarcla tags: v1.63-readonly | |
Changes
Modified dashboard-tests.scm from [0388c35774] to [a5c62d93cd].
︙ | ︙ | |||
402 403 404 405 406 407 408 | #:action (lambda (obj) (let ((comment (iup:attribute comnt "VALUE")) (test-id (db:test-get-id testdat))) (if (or (not wpatt) (string-match wregx comment)) (begin ;; (rmt:test-set-state-status-by-id run-id test-id #f "WAIVED" comment) | | | 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 | #:action (lambda (obj) (let ((comment (iup:attribute comnt "VALUE")) (test-id (db:test-get-id testdat))) (if (or (not wpatt) (string-match wregx comment)) (begin ;; (rmt:test-set-state-status-by-id run-id test-id #f "WAIVED" comment) (rmt:test-set-state-status run-id test-id #f "WAIVED" comment) (db:test-set-status! testdat "WAIVED") (cmtcmd comment) (iup:destroy! dlog)))))) (iup:button "Cancel" #:expand "HORIZONTAL" #:action (lambda (obj) (iup:destroy! dlog))))))) |
︙ | ︙ |