Org agenda and appointments

Org agenda and appointments

[Manuel Giraud via Users list for the GNU Emacs text editor]

Hi,

I like to have Emacs remind me of upcoming appointments.  For this, I
have put "(appt-activate 1)" in my init file and it works automagically
for anything that is (or will be) into the Diary.

Now, I'm also using Org agenda.  For instance, I use 'org-capture' to
enter some new appointment.  The Info manual says that I should call
'org-agenda-to-appt' to add Org agenda appointments and also have
notifications about those.  The problem is that I could forget to make
this call after entering a new appointment.

Inspired by what is done in 'appt-active', I came up with the following
solution in my init file:
--8<---------------cut here---------------start------------->8---
(defun +org-agenda-update-appt ()
  (when (member buffer-file-name (org-agenda-files))
    (org-agenda-to-appt))
  nil)
(add-hook 'write-file-functions #'+org-agenda-update-appt)
--8<---------------cut here---------------end--------------->8---

So my question is: Is there a better/cleaner interface to do this?
Because what I have done seems bit tricky from a user point of view.

Thanks,
-- 
Manuel Giraud

Re: Org agenda and appointments

[Robert Pluim]

>>>>> On Fri, 10 Mar 2023 11:31:23 +0100, Manuel Giraud via Users list for the GNU Emacs text editor <help-gnu-emacs@gnu.org> said:

    Manuel> Hi,
    Manuel> I like to have Emacs remind me of upcoming appointments.  For this, I
    Manuel> have put "(appt-activate 1)" in my init file and it works automagically
    Manuel> for anything that is (or will be) into the Diary.

    Manuel> Now, I'm also using Org agenda.  For instance, I use 'org-capture' to
    Manuel> enter some new appointment.  The Info manual says that I should call
    Manuel> 'org-agenda-to-appt' to add Org agenda appointments and also have
    Manuel> notifications about those.  The problem is that I could forget to make
    Manuel> this call after entering a new appointment.

    Manuel> Inspired by what is done in 'appt-active', I came up with the following
    Manuel> solution in my init file:

    Manuel> (defun +org-agenda-update-appt ()
    Manuel>   (when (member buffer-file-name (org-agenda-files))
    Manuel>     (org-agenda-to-appt))
    Manuel>   nil)
    Manuel> (add-hook 'write-file-functions #'+org-agenda-update-appt)

    Manuel> So my question is: Is there a better/cleaner interface to do this?
    Manuel> Because what I have done seems bit tricky from a user point of view.

I think this is what `org-capture-after-finalize-hook' is for.

Robert
-- 

Re: Org agenda and appointments

[Manuel Giraud via Users list for the GNU Emacs text editor]

Robert Pluim <rpluim@gmail.com> writes:

[...]

> I think this is what `org-capture-after-finalize-hook' is for.

Thanks.  It is indeed a more specialized hook.  But I thought I was
missing something simpler than setting up a hook.
-- 
Manuel Giraud

Re: Org agenda and appointments

[Manuel Giraud via Users list for the GNU Emacs text editor]

Manuel Giraud <manuel@ledu-giraud.fr> writes:

> Robert Pluim <rpluim@gmail.com> writes:
>
> [...]
>
>> I think this is what `org-capture-after-finalize-hook' is for.
>
> Thanks.  It is indeed a more specialized hook.  But I thought I was
> missing something simpler than setting up a hook.

Ok, it was just a one-liner:

(add-hook 'org-capture-after-finalize-hook #'org-agenda-to-appt)

Now what's left is the "changing day" update (as done in
'appt-activate')
-- 
Manuel Giraud