dotfiles/emacs/.emacs.d/config/init-utils.el

12 lines
424 B
EmacsLisp
Raw Normal View History

;; -*- lexical-binding: t; -*-
(defun unix-time-to-string (epoch-seconds &optional format-string)
"Converts an epoch timestamp into a human-readable string."
2022-10-05 15:54:07 +00:00
(interactive "nUnix timestamp: ")
(let* ((format-string (or format-string "%FT%T%z"))
(formatted (format-time-string format-string epoch-seconds)))
(if (called-interactively-p)
(message formatted)
formatted)))
(provide 'init-utils)