 (defun wh/blog-update-file-name ()
   "Set the current blog post file name according to the current title and date."
   (interactive)
-  (let* ((title (blog-post-title))
+  (let* ((title (wh/blog-post-title))
          ;; TODO: preserve the existing date.
-         (filename (blog-file-name title)))
+         (filename (wh/blog-file-name title)))
     (rename-file (buffer-file-name) filename)
     (rename-buffer filename)))
 


" title))))

(defun blog-post-title ()
  "Get the post title from the YAML front matter
in the current buffer."
  (save-excursion

(require 'f)

;; TODO: migrate these functions to https://github.com/fred-o/jekyll-modes/
(defun wh/blog-file-name (title &optional time)
  (format "%s-%s.markdown"
          ;; use `parse-time-string' to reverse this formatting
          (format-time-string "%Y-%m-%d" time)
