Update land-of-lisp: Refactoring with call-with-output-string