ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Save mobile inbox buffer after applying the changes

This commit is contained in:
Carsten Dominik 2009-10-22 17:50:29 +02:00
parent 9072f54582
commit b0834e5df2
2 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/ChangeLog
View File

@ -2,6 +2,8 @@
* org-mobile.el (org-mobile-update-checksum-for-capture-file): * org-mobile.el (org-mobile-update-checksum-for-capture-file):
Make sure the regexp search can fail without throwing an error. Make sure the regexp search can fail without throwing an error.
(org-mobile-apply): Save the inbox buffer after removing
successfully applied changes.
2009-10-22 John Wiegley <jwiegley@gmail.com> 2009-10-22 John Wiegley <jwiegley@gmail.com>

1
lisp/org-mobile.el
View File

@ -686,6 +686,7 @@ If BEG and END are given, only do this in that region."
;; So remove the entry ;; So remove the entry
(goto-char bos-marker) (goto-char bos-marker)
(delete-region (point) (org-end-of-subtree t t)))))) (delete-region (point) (org-end-of-subtree t t))))))
(save-buffer)
(move-marker marker nil) (move-marker marker nil)
(move-marker end nil) (move-marker end nil)
(message "%d new, %d edits, %d flags, %d errors" cnt-new (message "%d new, %d edits, %d flags, %d errors" cnt-new