I have this piece that indicates an opening parenthesis by blinking it. How can I make the function permanent? What other improvements can I do to help me with debugging code?

(defun blink-matching-open () "Indicate momentarily the start of parenthesized sexp before point." (interactive) (let ((blink-matching-paren-distance (buffer-size)) (blink-matching-paren t)) (blink-matching-open)))