(tags-query-replace): Set arg `map' of `perform-replace'