projects
/
blog.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
linux note
[blog.git]
/
blog-tool.el
diff --git
a/blog-tool.el
b/blog-tool.el
index
0590733
..
cb04b8e
100644
(file)
--- a/
blog-tool.el
+++ b/
blog-tool.el
@@
-32,7
+32,7
@@
(defun blog-tool-create-post ()
"Create a post."
(interactive)
(defun blog-tool-create-post ()
"Create a post."
(interactive)
- (let ((title (read-from-minibuffer "Title:"))
+ (let ((title (read-from-minibuffer "Title:
"))
(date (format-time-string "%Y-%m-%d"))
(filename ""))
(setq filename
(date (format-time-string "%Y-%m-%d"))
(filename ""))
(setq filename
@@
-46,7
+46,8
@@
"#+AUTHOR: " my-name "\n"
"#+EMAIL: " my-email "\n"
"#+DATE: " date " " (format-time-string "%A") "\n"
"#+AUTHOR: " my-name "\n"
"#+EMAIL: " my-email "\n"
"#+DATE: " date " " (format-time-string "%A") "\n"
- "\n"))))
+ "\n"))
+ (save-buffer)))