(redraw-display) is needlessly forceful. A mere (force-window-update) will do.