>>> "UB" == Uwe Brauer writes: >>> "IR" == Ihor Radchenko writes: >> Ihor Radchenko writes: >>> Uwe Brauer writes: >>> >>> I know I can save my weekly agenda view as a HTML file and then send it as as attachment. >> Sorry, I misread your first message. Attaching and sending is easy: >> (defun org-agenda-email () >> "Email agenda in current buffer as attachment." >> (interactive) >> (let ((to (read-string "Send to: ")) >> (subject (read-string "Subject: "))) >> (unless (derived-mode-p 'org-agenda-mode) (user-error "Should start from agenda view.")) >> (org-agenda-write (file-name-concat (temporary-file-directory) "agenda.html") nil nil (current-buffer)) >> (compose-mail to subject) >> (save-excursion >> (goto-char (point-max)) >> (mml-attach-file (file-name-concat (temporary-file-directory) "agenda.html"))))) > Thanks I run a test in an org-agenda and obtained > ,---- > | > | Debugger entered--Lisp error: (void-function file-name-concat) > | (file-name-concat (temporary-file-directory) "agenda.html") > | (org-agenda-write (file-name-concat (temporary-file-directory) "agenda.html") nil nil (current-buffer)) > | (let ((to (read-string "Send to: ")) (subject (read-string > | "Subject: "))) (if (derived-mode-p 'org-agenda-mode) nil (user-error > | "Should start from agenda view.")) (org-agenda-write > | (file-name-concat (temporary-file-directory) "agenda.html") nil nil > | (current-buffer)) (compose-mail to subject) (save-excursion > | (goto-char (point-max)) (mml-attach-file (file-name-concat > | (temporary-file-directory) "agenda.html")))) > | org-agenda-email() > | funcall-interactively(org-agenda-email) > | apply(funcall-interactively org-agenda-email nil) > | repeat-complex-command(1) > | funcall-interactively(repeat-complex-command 1) > | call-interactively(repeat-complex-command nil nil) > | command-execute(repeat-complex-command) > `---- I debugged it the problem is file-name-concat. I am running Emacs master 83a915d3dfafd5f3d737afe not too old, I'd say But that function is not defined. 😇