Option to not show private events

Thank you for a much needed display to make CiviCRM events usable!

I notice that all events are displayed, regardless of being public or private. An option to control this would be nice.
-------------

To not display private events, I currently modified 'civicrm_events.module' at line 134 by adding 'civicrm_event.is_public = 1'. Specifically, I changed:

$query = "SELECT `id`, `title`, `start_date` as start, `end_date` as end FROM `civicrm_event` WHERE civicrm_event.is_active = 1 AND civicrm_event.is_template = 0";

to

$query = "SELECT `id`, `title`, `start_date` as start, `end_date` as end FROM `civicrm_event` WHERE civicrm_event.is_active = 1 AND civicrm_event.is_template = 0 AND civicrm_event.is_public = 1";