             #'ar/after-prog-mode-text-change
             t t)
   (let ((m org-mode-map))
-    (define-key m [f6] #'ar/export-blog-to-html))
+    (define-key m [f6] #'ar/ox-html-export))
   (setq show-trailing-whitespace t)
   (set-fill-column 1000)
   (ar/org-src-color-blocks-dark)

  :bind ("C-c w" . er/expand-region))

(use-package recentf
  :config
  (setq recentf-max-saved-items 200
        recentf-max-menu-items 15))
(recentf-mode)

(use-package yasnippet :ensure t)
(setq yas-snippet-dirs

      _b_lock"
  ("l" ar/buffer-sort-lines-ignore-case nil)
  ("o" org-sort-list nil)
  ("b" ar/buffer-sort-current-block nil)
  ("q" nil nil :color blue))
(bind-key "M-s" #'hydra-sort/body)

