> Uwe Brauer <o...@mat.ucm.es> writes: > Ah well, this was a basis to get you started... This one > should work > (defun my-format-timestamps (cell) > (org-quote-csv-field > (replace-regexp-in-string > org-ts-regexp-both (lambda (m) > (format-time-string > (let ((hours? (string-match-p "[0-9]+:[0-9]+" m))) > (funcall (if hours? #'cdr #'car) > org-time-stamp-custom-formats)) > (apply #'encod-time (save-match-data > (org-parse-time-string m))))) > cell)))
There is a small misspelling. Should be encode-time not encod-time.
