Extracting names from an object and pasting it as column names

Question

Function foo below, takes the Name column of lme4::VarCorr(fit) output and makes them the column names for summary(rePCA(fit)) call.