source: .emacs@ 7123feb

;;; Emacs configuration for building a project

(require 'org)
(require 'ox-publish)
(require 'ox-latex)
(require 'org-webring)
(require 's)
(require 'simple-httpd)

(setq current-folder (file-truename "./"))

(defvar youtube-iframe-format
  ;; You may want to change your width and height.
  (concat "<iframe id=\"ivplayer\" type=\"text/html\""
          "src=\"https://youtube.host.w96k.dev/embed/%s\""
          " frameborder=\"0\""
          " allowfullscreen>%s</iframe>"))

(defvar local-video-format
  ;; You may want to change your width and height.
  (concat "<video controls>"
          "<source src=\"/public/videos/%s\"> Video are not supported </video>"))

(org-add-link-type
 "youtube"
 (lambda (handle)
   (browse-url
    (concat "https://invidiou.site/embed/"
            handle)))
 (lambda (path desc backend)
   (cl-case backend
     (html (format youtube-iframe-format
                   path (or desc "")))
     (latex (format "\href{%s}{%s}"
                    path (or desc "video"))))))

(org-add-link-type
 "video"
 (lambda (handle)
   (browse-url
    (concat "/"
            handle)))
 (lambda (path desc backend)
   (cl-case backend
     (html (format local-video-format
                   path (or desc "")))
     (latex (format "\href{%s}{%s}"
                    path (or desc "video"))))))

(setq org-publish-project-alist
      `(("blog"
         :components ("blog-content" "blog-styles")
         :base-directory current-folder)
        ("blog-styles"
         :base-directory ,(concat current-folder "public")
         :base-extension "jpg\\|webp\\|gif\\|svg\\|png\\|ico\\|css\\|txt\\|pdf\\|webm\\|mp4\\|mp3\\|flac\\|mov"
         :publishing-directory ,(concat current-folder "dist/public")
         :recursive t
         :publishing-function org-publish-attachment
         )
        ("blog-content"
         :base-directory ,(concat current-folder "content")
         :publishing-directory ,(concat current-folder "dist")
         :recursive t
         :publishing-function org-html-publish-to-html

         :html-doctype "html5"

         :with-title nil
         :with-author t
         :with-creator nil
         :with-date t
         :with-email t
         :with-footnotes t
         :html-html5-fancy t
         :html-preamble "
<div class=\"navbar\">
<a href=\"/\" class=\"button logo\">~w96k</a>
<a class=\"button\" href=\"/articles.html\">Articles</a>
<a class=\"button\" href=\"/projects.html\">Projects</a>
<a class=\"button\" href=\"/music.html\">Music</a>
<a class=\"button\" href=\"/emacs.html\">Emacs</a>
<a class=\"button\" href=\"/guix.html\">Guix</a>
</div>"

         :html-head "
<link rel=\"shortcut icon\" href=\"/public/favicon.png\">
<link rel=\"stylesheet\" href=\"/public/css/custom.css\" type=\"text/css\"/>
"

         :html-container "article"
         :html-postamble "
    <div id=\"copyright\">
      <p>Mikhail Kirillov © 2019-2022</p>
      <p>
       Works in <a href=\"https://anybrowser.org/campaign/\">any browser</a>
      </p>
    </div>

  <div align=\"center\">
      <p class=\"licenses\">
        <a href=\"https://creativecommons.org/licenses/by/4.0/\">
          <img alt=\"Creative Commons License\" src=\"/public/images/cc.png\" />
        </a>
     </p>
  </div>

    <div class=\"col-sm-12 col-md-5\" id=\"meta\">
      <p><span class=\"icon-settings\"></span> %c</p>
      <p><span class=\"icon-calendar\"></span> %C</p>
    </div>"

         :section-numbers nil
         :with-sub-superscript nil

         ;; sitemap - list of blog articles
         :auto-sitemap t
         :sitemap-filename "sitemap.org"
         :sitemap-title "@w96k"
         :sitemap-sort-files chronologically)))

;; Don't ask for block evaluation
(setq org-confirm-babel-evaluate nil)

;; Set output folder
(setq httpd-root (concat current-folder "/dist/"))

;; Fix image width
(setq org-image-actual-width nil)

;; PDF output settings
(setq org-latex-listings 'minted)
(setq org-latex-tables-centered nil)
(add-to-list 'org-latex-packages-alist '("russian" "babel"))
(add-to-list 'org-latex-packages-alist '("" "minted"))
(add-to-list 'org-latex-packages-alist '("" "nopageno"))
(add-to-list 'org-latex-packages-alist '("utf8x" "inputenc"))
(add-to-list 'org-latex-packages-alist '("a4paper, margin=0.75in" "geometry"))

(setq org-src-fontify-natively t)