350c350,352
<         if(strequal(clist->domain, co->domain))
---
>         if(strequal(clist->domain, co->domain) ||
>            (clist->domain[0]=='.' && strequal(&(clist->domain[1]), co->domain)) ||
>            (co->domain[0]=='.' && strequal(clist->domain, &(co->domain[1]))) )