multi join 되는 lisp없나요?

등고선(pline)이 중간 중간 끊긴걸 모두 join해야하는 작업이 있는데
모든 선을 선택해서 join하는 lisp없나요?
저한텐 한줄 선택해서 그선에 붙어있는 모든 line을 join하는 lisp만
있거든요..
혹시 lisp 잘해서 고쳐주실 분을 위해 lisp 첨부해 놓습니다
꼬~옥 도와주셔요……