Updated the code to use Control.Lens