Overview
| Comment: | Fixed the tree browser filters in runs tab |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.61 |
| Files: | files | file ages | folders |
| SHA1: |
78514dad407d9e3f61c279ef52249ec4 |
| User & Date: | ritikaag on 2016-09-08 18:30:19 |
| Other Links: | branch diff | manifest | tags |
Context
|
2016-09-09
| ||
| 17:23 | squashed bug with runs summary tab crashing when test count changed between selections check-in: d196513dd0 user: bjbarcla tags: v1.61 | |
| 00:00 | Merged v1.61 into re-refactor-dbr:dbstruct branch. Can use meld to bring some of the work to v1.62 Closed-Leaf check-in: fb4085dbbf user: matt tags: re-refactor-vec2defstruct | |
|
2016-09-08
| ||
| 23:34 | Merged v1.61 into refactor-dbr:dbstruct branch. Can use meld to bring some of the work back to v1.62 Closed-Leaf check-in: ac0e82322e user: matt tags: refactor-dbr:dbstruct | |
| 18:31 | db upate check-in: 41a6e4d3ac user: ritikaag tags: db | |
| 18:30 | Fixed the tree browser filters in runs tab check-in: 78514dad40 user: ritikaag tags: v1.61 | |
| 10:55 | merged fork check-in: 7b7e09a505 user: bjbarcla tags: v1.61 | |
Changes
Modified dashboard.scm from [aed922b773] to [bbd53a39b6].
| ︙ | ︙ | |||
566 567 568 569 570 571 572 | ;; this calls dboard:get-tests-for-run-duplicate for each run ;; ;; create a virtual table of all the tests ;; keypatts: ( (KEY1 "abc%def")(KEY2 "%") ) ;; (define (update-rundat tabdat runnamepatt numruns testnamepatt keypatts) (let* ( | | | > | > | | 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 |
;; this calls dboard:get-tests-for-run-duplicate for each run
;;
;; create a virtual table of all the tests
;; keypatts: ( (KEY1 "abc%def")(KEY2 "%") )
;;
(define (update-rundat tabdat runnamepatt numruns testnamepatt keypatts)
(let* (
(allruns (rmt:get-runs runnamepatt numruns (dboard:tabdat-start-run-offset tabdat) keypatts))
;;(allruns-tree (rmt:get-runs-by-patt (dboard:tabdat-keys tabdat) "%" #f #f #f #f))
(allruns-tree (rmt:get-runs "%" #f "0" '()))
(header (db:get-header allruns))
(runs (db:get-rows allruns)) ;; RA => Filtered as per runpatt selected
(runs-tree (db:get-rows allruns-tree)) ;; RA => Returns complete list of runs
(start-time (current-seconds))
(runs-hash (let ((ht (make-hash-table)))
(for-each (lambda (run)
(hash-table-set! ht (db:get-value-by-header run header "id") run))
runs-tree) ;; (vector-ref runs-dat 1))
ht))
(tb (dboard:tabdat-runs-tree tabdat)))
(dboard:tabdat-header-set! tabdat header)
;;
;; trim runs to only those that are changing often here
;;
(if (null? runs)
|
| ︙ | ︙ |