Edit lisp problem a bit