/* Returns the resulting prop list, or NULL if an error occured  */
CRPropList* cr_prop_list_append(CRPropList *a_this, CRPropList *a_to_append)
/* Returns the resulting prop list, or NULL if an error occured  */
CRPropList* cr_prop_list_append(CRPropList *a_this, CRPropList *a_to_append)
{
        CRPropList *cur = NULL;
        g_return_val_if_fail (a_to_append, NULL);
        if (!a_this)
                return a_to_append;
        for (cur = a_this;
             cur && PRIVATE (cur) && PRIVATE (cur)->next;
             cur = PRIVATE (cur)->next) ;
        g_return_val_if_fail (cur, NULL);
        PRIVATE (cur)->next = a_to_append;
        PRIVATE (a_to_append)->prev = cur;
        return a_this;
}