gg

(defvar world2ch-offline-date "2026-01-18"
  "Date that world2ch.net went offline.")

(defun today ()
  "Return today's date as an ISO-8601 date string."
  (format-time-string "%Y-%m-%d"))

(defun days-offline ()
  "Print and return the number of days since world2ch.net went offline."
  (interactive)
  (let* ((math (format "<%s> - <%s> + 1"
                       (today)
                       world2ch-offline-date))
         (answer (calc-eval math)))
    (message answer)
    answer))

(days-offline)