@@ -216,10 +216,11 @@ ;; General displayer ;; (define (dashboard:area-display data adat window-id) (let* ((view-matrix (iup:matrix + ;; (runs-for-targ (db:get-runs-by-patt *dbstruct-local* *keys* "%" target #f #f #f)) #:expand "YES" ;; #:fittosize "YES" #:scrollbar "YES" #:numcol 100 #:numlin 100 @@ -240,10 +241,14 @@ ;; Browse and control a single run ;; (define (runcontrol window-id) (iup:hbox)) +;; NB// Wierd conflict error here +;; +;; (let* ((runs-dat (db:get-runs-by-patt db *keys* "%" #f #f #f #f)) + ;;====================================================================== ;; A R E A S ;;====================================================================== (define (dashboard:init-area data area-name apath)