Hi Rainer,

Rainer Stengele <rainer.steng...@online.de> 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

Reply via email to