+(defun blog-setup-project-alist (root-dir &optinal output-dir)
+ "Set project alist. `output-dir' is the directory of publish-directory.
+`root-dir' is the root directory of blog repository."
+ (unless output-dir (setq output-dir (concat root-dir "_site/")))