(defmacro mixi-atom-make-date (time)
`(let ((date (format-time-string "%Y-%m-%dT%T%z" ,time)))
(if (string-match "[+-][0-9][0-9][0-9][0-9]$" date)
(defmacro mixi-atom-make-date (time)
`(let ((date (format-time-string "%Y-%m-%dT%T%z" ,time)))
(if (string-match "[+-][0-9][0-9][0-9][0-9]$" date)