edited wescheme-link function