(format "Error, list is too short: ~s" '(one "two" 3))
; => "Error, list is too short: (one \"two\" 3))"

should be:
; => "Error, list is too short: (one \"two\" 3)"

I.e. one fewer right-parenthesis.
--
	--Per Bothner
xxxxxx@bothner.com   http://per.bothner.com/