(progn (goto-char (point-max)) (insert "test line\n")) (defun mytest () (message "hi"))