I expected the following query to return [[2] [2]] instead of [[4]] because the with clause should have grouped by list first:

(d/q '[:find (count ?todo)
         :with ?l
         :where
         [?l :list/todo ?todo]
         ]
    db)