(use-package org-static-blog
  :vc ( :url "https://github.com/torusJKL/org-static-blog"
        :branch "custom-filename-function")
  :ensure nil
  :defer t
  :custom
  (org-static-blog-posts-directory "~/blog/org")
  (org-static-blog-drafts-directory "~/blog/drafts")
  (org-static-blog-publish-directory "~/blog/html")
  (org-static-blog-enable-tags t)
  (org-static-blog-publish-title "Gal Buki's blog")
  (org-static-blog-publish-url "/")
  (org-static-blog-use-preview t)
  (org-static-blog-preview-ellipsis "continued ...")
  (org-static-blog-preview-link-p t)
  (org-static-blog-preview-date-first-p nil)
  (org-static-blog-enable-og-tags t)
  (org-export-with-section-numbers nil)
  (org-static-blog-page-header "<link rel=\"stylesheet\" type=\"text/css\" href=\"./static/blog.css\">")
  (org-static-blog-page-preamble
   "<div class=\"header\">
  <div class=\"sitelinks\">
    <a href=\"/index.html\">Home</a>
    |
    <a href=\"/archive.html\">All Posts</a>
  </div>
  <label class=\"theme-toggle\" title=\"Toggle dark mode\">
    <input type=\"checkbox\" id=\"theme-toggle\">
    <span></span>
  </label>
</div>")
  (org-static-blog-page-postamble
   "<div>Powered by <a href=\"https://www.gnu.org/software/emacs/\" target=\"_blank\">Emacs</a> &
<a href=\"https://github.com/bastibe/org-static-blog/\" target=\"_blank\">Org Static Blog</a>
</div>")
  :config
  ;; replacement function that wraps tag with <span></span>
  (defun org-static-blog-assemble-tags-archive-tag (tag)
    "Assemble single TAG for all filenames (custom version)."
    (let ((post-filenames (cdr tag)))
      (setq post-filenames
            (sort post-filenames (lambda (x y) (time-less-p (org-static-blog-get-date x)
                                                            (org-static-blog-get-date y)))))
      (concat "<h1 class=\"tags-title\">" (org-static-blog-gettext 'posts-tagged) " \"<span>" (downcase (car tag)) "</span>\":</h1>\n"
              (apply 'concat (mapcar 'org-static-blog-get-post-summary post-filenames))))))

(defun my/org-blog-title-date-filename (post-filename metadata)
  "Generate filename like: 20240115--my-post-title.html
     Converts title to lowercase, spaces to dashes, and removes unsafe filename characters."
  (let-alist metadata
    (let* ((date-str (format-time-string "%Y%m%d" .date))
           ;; Remove unsafe filename characters: : / \ ? * < > | "
           (title-safe (replace-regexp-in-string "[:\\/\\\\?*<>|\"]" "" .title))
           (title-lower (downcase title-safe))
           (title-with-dashes (replace-regexp-in-string " " "-" title-lower)))
      (concat date-str "--" title-with-dashes ".html"))))

(setq org-static-blog-post-filename-function #'my/org-blog-title-date-filename)