[O] bug#19448: 25.0.50; org-mobile-push should offer to save unsaved agenda files

[Nicolas Goaziou]

Hello,

Rudi Schlatte <address@hidden> writes:

> When trying to call `org-mobile-push' while an org file in
> org-agenda-files is open and modified, `org-mobile-push' displays a
> prompt like the following in the minibuffer:
>
> Non-existent agenda file ~/Documents/Org/.#notes.org.  [R]emove from list or 
> [A]bort?
>
> This trivial patch uses `save-some-buffers' to save the agenda
> files, removing the confusing prompt:
>
> --- a/lisp/org/org-mobile.el
> +++ b/lisp/org/org-mobile.el
> @@ -318,6 +318,9 @@ create all custom agenda views, for upload to the mobile 
> phone."
>         (org-agenda-buffer-name "*SUMO*")
>         (org-agenda-tag-filter org-agenda-tag-filter)
>         (org-agenda-redo-command org-agenda-redo-command))
> +      (let ((agenda-files (org-agenda-files)))
> +        (save-some-buffers nil (lambda () (member (buffer-file-name)
> +                                                  agenda-files))))
>        (save-excursion
>       (save-restriction
>         (save-window-excursion

I applied something equivalent.

Thank you.

Regards,
-- 
Nicolas Goaziou                                                0x80A93738