@@ -2445,24 +2445,10 @@
      (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))
-	 (monitor-db-path (dboard:tabdat-monitor-db-path tabdat))
-	 (monitor-modtime (if (and monitor-db-path (common:file-exists? monitor-db-path))
-			      (file-modification-time monitor-db-path)
-			      -1)))
-    (if (and (eq? (dboard:commondat-curr-tab-num commondat) 0)
-	     (or (> monitor-modtime *last-monitor-update-time*)
-		 (> (- run-update-time *last-monitor-update-time*) 5))) ;; update every 1/2 minute just in case
-	(begin
-	  (set! *last-monitor-update-time* run-update-time) ;; monitor-modtime)
-	  #t)
-	#f)))
-
 (define (dboard:get-last-db-update tabdat context)
   (hash-table-ref/default (dboard:tabdat-last-db-update tabdat) context 0))
 
 (define (dboard:set-last-db-update! tabdat context newtime)
   (hash-table-set! (dboard:tabdat-last-db-update tabdat) context newtime))