Megatest

Check-in [57c11951db]
Login
Overview
Comment:fixed run tab issue with ...-duplicate
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | runs-summary-context-menu
Files: files | file ages | folders
SHA1: 57c11951db8ae0427139978d2ef676049820769a
User & Date: bjbarcla on 2016-09-16 14:01:56
Other Links: branch diff | manifest | tags
Context
2016-09-16
14:32
wip check-in: e2034bf712 user: bjbarcla tags: runs-summary-context-menu
14:01
fixed run tab issue with ...-duplicate check-in: 57c11951db user: bjbarcla tags: runs-summary-context-menu
13:44
wip - dead end? check-in: 85fd17fcde user: bjbarcla tags: runs-summary-context-menu
Changes

Modified dashboard.scm from [c7bbda05bf] to [4f9265f1a6].

506
507
508
509
510
511
512

513


514
515
516
517
518
519
520
506
507
508
509
510
511
512
513

514
515
516
517
518
519
520
521
522







+
-
+
+







			 (let ((rd (dboard:rundat-make-init run: run key-vals: key-vals)))
			   (hash-table-set! (dboard:tabdat-allruns-by-id tabdat) run-id rd)
			   rd)))
	 ;; (prev-tests  (dboard:rundat-tests prev-dat)) ;; (vector-ref prev-dat 1))
         (last-update
          (if turn-off-query-optimization
              0
              (dboard:rundat-last-update run-dat)
              (hash-table-ref/default (dboard:tabdat-run-update-times tabdat) run-id 0)))
              ;;(hash-table-ref/default (dboard:tabdat-run-update-times tabdat) run-id 0)
              ))

	 (db-path     (or (dboard:rundat-db-path run-dat)
			  (let* ((db-dir (tasks:get-task-db-path))
				 (db-pth (conc db-dir "/" run-id ".db")))
			    (dboard:rundat-db-path-set! run-dat db-pth)
			    db-pth)))
	 (tmptests    (if (or turn-off-dbfile-timestamp-optimization