[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [O] Modify clock in/out time to previous/following full quarter of a
From: |
Bastien |
Subject: |
Re: [O] Modify clock in/out time to previous/following full quarter of an hour. |
Date: |
Tue, 18 Sep 2012 09:55:11 +0200 |
User-agent: |
Gnus/5.130006 (Ma Gnus v0.6) Emacs/24.2.50 (gnu/linux) |
Hi Rainer,
Rainer Stengele <address@hidden> writes:
> How could I achieve this? Which hook should I use? How? (I never
> programmed something like this).
(defun my-org-adjust-clock-timestamps ()
(interactive)
(let ((org-time-stamp-rounding-minutes '(0 15)))
(save-excursion
(beginning-of-line)
(re-search-forward org-ts-regexp3 nil t)
(backward-char 2)
(org-shiftdown)
(re-search-forward org-ts-regexp3 nil t)
(backward-char 2)
(org-shiftup))))
HTH,
--
Bastien