mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-25 13:32:52 +00:00
Remove the dependence on time-stamp.el.
This commit is contained in:
parent
07657f3e80
commit
7c40034fd8
|
@ -1,3 +1,7 @@
|
||||||
|
2008-10-28 Carsten Dominik <dominik@science.uva.nl>
|
||||||
|
|
||||||
|
* org-clock.el (org-clock-save): Insert time stamp without
|
||||||
|
dependence on time-stamp.el.
|
||||||
|
|
||||||
2008-10-27 Carsten Dominik <dominik@science.uva.nl>
|
2008-10-27 Carsten Dominik <dominik@science.uva.nl>
|
||||||
|
|
||||||
|
|
|
@ -1016,7 +1016,9 @@ the currently selected interval size."
|
||||||
(with-current-buffer (find-file (expand-file-name org-clock-persist-file))
|
(with-current-buffer (find-file (expand-file-name org-clock-persist-file))
|
||||||
(progn (delete-region (point-min) (point-max))
|
(progn (delete-region (point-min) (point-max))
|
||||||
;;Store clock
|
;;Store clock
|
||||||
(insert (format ";; org-persist.el - %s at %s\n" system-name (time-stamp-string)))
|
(insert (format ";; org-persist.el - %s at %s\n"
|
||||||
|
system-name (format-time-string
|
||||||
|
(cdr (org-time-stamp-formats)))))
|
||||||
(if (and org-clock-persist (marker-buffer org-clock-marker)
|
(if (and org-clock-persist (marker-buffer org-clock-marker)
|
||||||
(or (not org-clock-persist-query-save)
|
(or (not org-clock-persist-query-save)
|
||||||
(y-or-n-p (concat "Save current clock ("
|
(y-or-n-p (concat "Save current clock ("
|
||||||
|
@ -1042,8 +1044,6 @@ the currently selected interval size."
|
||||||
|
|
||||||
(defvar org-clock-loaded nil)
|
(defvar org-clock-loaded nil)
|
||||||
|
|
||||||
(require 'timestamp)
|
|
||||||
|
|
||||||
(defun org-clock-load ()
|
(defun org-clock-load ()
|
||||||
"Load various clock-related data from disk, optionally resuming
|
"Load various clock-related data from disk, optionally resuming
|
||||||
a stored clock"
|
a stored clock"
|
||||||
|
|
Loading…
Reference in a new issue