Help with methods?

I was making script to find the parts connected but in line 6 it won't return the other parts that are connected it just returns the part itself,why and how do I fix it?

function FindSurfaceOfPart(Part)
    ----------------------------
        while wait() do-- Refreshes
            PartsTouched = Part:GetConnectedParts()
    ----------------------------
            function FindParts()--Finds the part in the table
                    for i,v in pairs (PartsTouched) do
                        print(v)
                        return v
                    end
                end 
        ----------------------------
                if #PartsTouched > 1 then
                    Parts = FindParts()
                    --To Be Finished
            end
        end
    end

FindSurfaceOfPart(script.Parent)