Make updating the mibileorg.org checksum safe

This commit is contained in:
Carsten Dominik 2009-10-22 16:30:00 +02:00
parent bdb6992813
commit 9072f54582
3 changed files with 6 additions and 2 deletions

View File

@ -1,3 +1,8 @@
2009-10-22 Carsten Dominik <carsten.dominik@gmail.com>
* org-mobile.el (org-mobile-update-checksum-for-capture-file):
Make sure the regexp search can fail without throwing an error.
2009-10-22 John Wiegley <jwiegley@gmail.com>
* org-clock.el (org-resolve-clocks-if-idle): Fix to the way idle

View File

@ -218,7 +218,6 @@ string as argument."
:group 'org-clock
:type 'boolean)
(defvar org-clock-in-prepare-hook nil
"Hook run when preparing the clock.
This hook is run before anything happens to the task that

View File

@ -547,7 +547,7 @@ If nothing new has beed added, return nil."
(with-current-buffer buffer
(when (re-search-forward (concat "\\([0-9a-fA-F]\\{30,\\}\\).*?"
(regexp-quote org-mobile-capture-file)
"[ \t]*$"))
"[ \t]*$") nil t)
(goto-char (match-beginning 1))
(delete-region (match-beginning 1) (match-end 1))
(insert (md5 buffer-string))