Glass door now takes three arguments and uses the do-list-pog-fn interface.