Function: org-fix-decoded-time
org-fix-decoded-time is a byte-compiled function defined in org.el.gz.
Signature
(org-fix-decoded-time TIME)
Documentation
Set 0 instead of nil for the first 6 elements of time.
Don't touch the rest.
Source Code
;; Defined in /usr/src/emacs/lisp/org/org.el.gz
(defun org-fix-decoded-time (time)
"Set 0 instead of nil for the first 6 elements of time.
Don't touch the rest."
(let ((n 0))
(mapcar (lambda (x) (if (< (setq n (1+ n)) 7) (or x 0) x)) time)))