added portrait
Vastly simplified code for loading swank with quicklisp.