docs: fix examples/dns-lookup.lisp
docs: fix examples/dns-lookup.lisp

The callback is a keyword element now.

Also simplified some of the default parameter handling to focus the code on
as:dns-lookup.

orthecreedence/cl-async