source-lisp will almost never be right. Fix it.