Index: tcp-transportmod.scm
==================================================================
--- tcp-transportmod.scm
+++ tcp-transportmod.scm
@@ -575,11 +575,11 @@
 					;;
 					;; New idea:
 					;;  1. check all processes entries that match the db
 					;;  2. sort by fixed heuristic
 					;;  3. if I'm number one, set state to 'running and db-locked-in to #t
-					(let* ((candidates (map dbfile:row->procinfo
+					(let* ((candidates (map dbfile:row->procinf
 								(dbfile:with-no-sync-db
 								 nosyncdbpath
 								 (lambda (nsdb)
 								   (dbfile:get-process-options nsdb "server" dbfname)))))
 					       (primecand  (begin