@@ -1191,22 +1191,19 @@
          (host-last-update-timeout-seconds 10)
          (host-rec (hash-table-ref/default *host-loads* hostname #f))
          )
     (cond
      ((< load-sample-age loadinfo-timeout-seconds)
-      ;;(print "BB> chr - 1")
       (list #t
             load-sample-time
             load))
      ((and host-rec
            (< (current-seconds) (+ (host-last-update host-rec) host-last-update-timeout-seconds)))
-      ;;(print "BB> chr - 2")
       (list #t
             (host-last-update host-rec)
             (host-last-cpuload host-rec )))
      ((common:unix-ping hostname)
-      ;;(print "BB> chr - 3 host-rec="host-rec" lu="(if host-rec (- (current-seconds) (host-last-update host-rec)) "None"))
       (list #t
             (current-seconds)
             (alist-ref 'adj-core-load (common:get-normalized-cpu-load hostname))))
      (else
       (list #f 0 -1)))))