Deleting email address fails when corresponding row exists in mail queue

Error Details:

Array
(
[callback] => Array
(
[0] => CRM_Core_Error
[1] => handle
)

[code] => -1
[message] => DB Error: unknown error
[mode] => 16
[debug_info] => DELETE FROM civicrm_email WHERE ( civicrm_email.id = 18396 ) [nativecode=1451 ** Cannot delete or update a parent row: a foreign key constraint fails (`fm_civicrm/civicrm_mailing_event_queue`, CONSTRAINT `FK_civicrm_mailing_event_queue_email_id` FOREIGN KEY (`email_id`) REFERENCES `civicrm_email` (`id`))]
[type] => DB_Error
[user_info] => DELETE FROM civicrm_email WHERE ( civicrm_email.id = 18396 ) [nativecode=1451 ** Cannot delete or update a parent row: a foreign key constraint fails (`fm_civicrm/civicrm_mailing_event_queue`, CONSTRAINT `FK_civicrm_mailing_event_queue_email_id` FOREIGN KEY (`email_id`) REFERENCES `civicrm_email` (`id`))]
[to_string] => [db_error: message="DB Error: unknown error" code=-1 mode=callback callback=CRM_Core_Error::handle prefix="" info="DELETE FROM civicrm_email WHERE ( civicrm_email.id = 18396 ) [nativecode=1451 ** Cannot delete or update a parent row: a foreign key constraint fails (`fm_civicrm/civicrm_mailing_event_queue`, CONSTRAINT `FK_civicrm_mailing_event_queue_email_id` FOREIGN KEY (`email_id`) REFERENCES `civicrm_email` (`id`))]"]
)