| I was randomly paging through srv.arc and noticed something that didn't look quite right, but I wasn't sure. Thoughts? (def unique-id ((o len 8))
(let id (sym (rand-string (max 5 len)))
(if (unique-ids* id)
(unique-id) ; why isn't len passed here?
(= (unique-ids* id) id))))
|
