diff options
| author | jao <jao@gnu.org> | 2025-10-05 00:29:32 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2025-10-05 00:29:32 +0100 |
| commit | 9d0f2e5109c2bacb010cb9e2989bb26bca37d629 (patch) | |
| tree | d6431c8c63b9ed56a870db483b15f32cdfe59370 /custom/jao-custom-blog.el | |
| parent | 45d4d05ff0531b37dae509c95b075a3baf6eec15 (diff) | |
| download | elibs-9d0f2e5109c2bacb010cb9e2989bb26bca37d629.tar.gz elibs-9d0f2e5109c2bacb010cb9e2989bb26bca37d629.tar.bz2 | |
jao-org-blog: wee fix
Diffstat (limited to 'custom/jao-custom-blog.el')
| -rw-r--r-- | custom/jao-custom-blog.el | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/custom/jao-custom-blog.el b/custom/jao-custom-blog.el index 56f2378..7515440 100644 --- a/custom/jao-custom-blog.el +++ b/custom/jao-custom-blog.el @@ -151,12 +151,11 @@ ;;; Drafts (defun jao-org-static-blog-update-date () (interactive) - (when (y-or-n-p "Update date? ") - (goto-char (point-min)) - (when (re-search-forward "^#\\+date: " nil t) - (delete-line) - (insert (format-time-string "<%Y-%m-%d %H:%M>")) - (save-buffer)))) + (goto-char (point-min)) + (when (re-search-forward "^#\\+date: " nil t) + (org-kill-line) + (insert (format-time-string "<%Y-%m-%d %H:%M>")) + (save-buffer))) (defun jao-org-static-blog-create-new-draft () (interactive) |