@@ -132,11 +132,11 @@ (let ((res '())) (sqlite3:for-each-row (lambda (id pid hostname port start-time priority state) (set! res (cons (vector id pid hostname port start-time priority state) res))) mdb - "SELECT id,pid,hostname,port,start_time,priority,state FROM servers ORDER BY start_time ASC;") + "SELECT id,pid,hostname,port,start_time,priority,state FROM servers ORDER BY start_time DESC;") res)) ;;====================================================================== ;; Tasks and Task monitors