MobileOrg: Do not insert timestamp before mode/local variable line

Patch by Charles Sebold.
This commit is contained in:
Carsten Dominik 2009-11-13 00:22:18 +01:00
parent f21a4e7274
commit 0f826be931
2 changed files with 9 additions and 4 deletions

View File

@ -2,6 +2,8 @@
* org-mobile.el (org-mobile-write-checksums): Specify coding
system.
(org-mobile-timestamp-buffer): Keep local variable/mode line at
beginning of buffer.
* org-latex.el (org-latex-entities-regexp): Fix typo in regexp.

View File

@ -739,10 +739,13 @@ If BEG and END are given, only do this in that region."
(save-restriction
(widen)
(goto-char (point-min))
(when (re-search-forward
"^\\([ \t]*\\)#\\+LAST_MOBILE_CHANGE:.*\n?" nil t)
(goto-char (match-end 1))
(delete-region (point) (match-end 0)))
(if (re-search-forward
"^\\([ \t]*\\)#\\+LAST_MOBILE_CHANGE:.*\n?" nil t)
(progn
(goto-char (match-end 1))
(delete-region (point) (match-end 0)))
(if (looking-at ".*?-\\*-.*-\\*-")
(forward-line 1)))
(insert "#+LAST_MOBILE_CHANGE: "
(format-time-string "%Y-%m-%d %T") "\n")))))