Fix org-publish file timestamps for Windows.
This was a patch by Tokuya Kameshima.
This commit is contained in:
parent
71b08c4c5e
commit
f6dc99bd9b
|
@ -1,5 +1,8 @@
|
|||
2008-02-05 Carsten Dominik <dominik@science.uva.nl>
|
||||
|
||||
* org-publish.el (org-publish-timestamp-filename): Protect ":" in
|
||||
file name path under windows.
|
||||
|
||||
* org.el (org-update-checkbox-count): Revamped to deal with
|
||||
hierarchical beckboxes. This was a patch from Miguel
|
||||
A. Figueroa-Villanueva.
|
||||
|
|
|
@ -291,14 +291,13 @@ files."
|
|||
|
||||
;;;; Timestamp-related functions
|
||||
|
||||
|
||||
(defun org-publish-timestamp-filename (filename)
|
||||
"Return path to timestamp file for filename FILENAME."
|
||||
(while (string-match "~\\|/" filename)
|
||||
(while (string-match (if (eq system-type 'windows-nt) "~\\|/\\|:" "~\\|/")
|
||||
filename)
|
||||
(setq filename (replace-match "_" nil t filename)))
|
||||
(concat org-publish-timestamp-directory filename ".timestamp"))
|
||||
|
||||
|
||||
(defun org-publish-needed-p (filename)
|
||||
"Check whether file should be published.
|
||||
If org-publish-use-timestamps-flag is set to nil, this function always
|
||||
|
|
Loading…
Reference in New Issue