correction RPROMPT