Huw Davies : riched20: Move underline pen creation to a helper function.