diff options
| author |  Tom Willemsen | 2013-01-04 00:01:52 +0100 |
|---|---|---|
| committer | Tom Willemsen | 2013-01-04 00:01:52 +0100 |
| commit | 1be69078ad8c1af62de79b80345a72d2b8490b04 (patch) | |
| tree | 036d3de31b3740e603701e3b90591ce41f492464 | |
| parent | a13dbcec8da7e9b06e0ca3a1d3ee6760686e38e6 (diff) | |
| download | dotfiles-1be69078ad8c1af62de79b80345a72d2b8490b04.tar.gz dotfiles-1be69078ad8c1af62de79b80345a72d2b8490b04.zip | |
eltuki: Add post skeleton and use it for new posts
| -rw-r--r-- | .emacs.d/site-lisp/eltuki.el | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/.emacs.d/site-lisp/eltuki.el b/.emacs.d/site-lisp/eltuki.el index 80400a9..224e9ab 100644 --- a/.emacs.d/site-lisp/eltuki.el +++ b/.emacs.d/site-lisp/eltuki.el @@ -46,10 +46,20 @@ :group 'eltuki :type 'string) +(define-skeleton eltuki-post + "Create a post template for eltuki." + "" + "#+TITLE: " (skeleton-read "Title: ") "\n" + "#+TIMESTAMP: \n" + "#+TAGS: " (skeleton-read "Tags (comma separated): ") "\n" + "\n" + _) + (defun eltuki-new-post () (interactive) (switch-to-buffer (get-buffer-create "*eltuki*")) - (org-mode)) + (org-mode) + (eltuki-post)) (defun eltuki-get-title () (save-excursion |