fix donate.lisp