;; -*- lexical-binding: t; -*-
(defun unix-time-to-string (epoch-seconds &optional format-string)
  "Converts an epoch timestamp into a human-readable string."
  (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)))

(defun display-ansi-colors ()
  (interactive)
  (require 'ansi-color)
  (ansi-color-apply-on-region (point-min) (point-max)))

(provide 'init-utils)