Index: loadwatch/loadwatch.scm
==================================================================
--- loadwatch/loadwatch.scm
+++ loadwatch/loadwatch.scm
@@ -50,6 +50,7 @@
 		   (processdat-virt-set!  pdat (+ (processdat-virt pdat) virt))
 		   (processdat-res-set!   pdat (+ (processdat-res pdat)  res))
 		   (processdat-count-set! pdat (+ (processdat-count pdat) 1))
 		   (loop (read-line) inbod)))))))))
 	   
+(define x (snagload))
 (processdat-%cpu (hash-table-ref (hash-table-ref x "matt") "evolution-calen"))