#+TITLE: Index
* Hello There!
Welcome to my website! I'm [[./about.org][akk0]]. I blog about Emacs, programming, meditation, otaku stuff, and other things that interest me. You can view the full list of pages on the [[./sitemap.org][sitemap]].

This site launched recently and is still under construction; please pardon the dust! Don't hestitate to reach out to me through the email address in the footer for feedback or feature suggestions ^^".

Here's a short /Best Of/:
- [[./source.org][source.org]], the literate sources and documentation for this website;
- My retrospective on [[./events/premier_impact.org][Premier Impact]], a music event I co-organized.

Here's this week's [[./journal/w48-2025.org][journal]]!

** /Pro Tips/
- You can fold and unfold sections by clicking the headline. Try it!
- Click on any cell with a dotted outline in the habit tracker to see my journal entry for it. The currently selected cell will be highlighted with a solid line.

** Habits
#+BEGIN_SRC emacs-lisp :results value html :exports results
(defun format-date-with-ordinal ()
  "Format today's date as 'Thursday, November 20th'."
  (let* ((day (string-to-number (format-time-string "%d")))
         (suffix (cond
                  ((and (>= (mod day 100) 11) (<= (mod day 100) 13)) "th")
                  ((= (mod day 10) 1) "st")
                  ((= (mod day 10) 2) "nd")
                  ((= (mod day 10) 3) "rd")
                  (t "th"))))
    (format "%s, %s %d%s"
            (format-time-string "%A")    ; Day of week
            (format-time-string "%B")    ; Month name
            day                           ; Day number
            suffix)))                     ; Ordinal suffix

(format "<div class='center'><i>Today is %s.</i></div>"
 (format-date-with-ordinal))
#+END_SRC

#+CALL: source.org:habit-tracker() :results value html :exports results