id	summary	reporter	owner	description	type	status	priority	milestone	component	version	resolution	keywords	cc	difficulty
1717	coops — slot-initialized?	Idiomdrottning		"Please change the last line of slot-initialized? to match
{{{
(define (slot-initialized? obj slotname)
  (let ((i (slot-lookup obj slotname 'slot-initialized?)))
    (if i
	(not (eq? (##sys#slot (coops-instance-slots obj) i) uninitialized))
	#f)))
}}}"	defect	closed	major	someday	unknown	5.2.0	fixed	coops