أغنيس من فرنسا، إمبراطورة البيزنطية