today's date

This commit is contained in:
larstvei 2024-07-04 17:58:04 +02:00
parent c26d2a5d2b
commit 70f5a61763

View File

@ -1473,6 +1473,14 @@
(fill-paragraph nil (region-active-p)))) (fill-paragraph nil (region-active-p))))
#+end_src #+end_src
I don't enjoy writing out today's date, so let's tuck that into a function.
#+begin_src emacs-lisp
(defun insert-todays-date ()
(interactive)
(insert (format-time-string "%Y-%m-%d")))
#+end_src
* Advice * Advice
An advice can be given to a function to make it behave differently. This An advice can be given to a function to make it behave differently. This
@ -2089,6 +2097,7 @@
("C-c j" . cycle-spacing-delete-newlines) ("C-c j" . cycle-spacing-delete-newlines)
("C-c d" . duplicate-thing) ("C-c d" . duplicate-thing)
("<C-tab>" . tidy) ("<C-tab>" . tidy)
("C-c t" . insert-todays-date)
("C-c q" . unfill-paragraph)) ("C-c q" . unfill-paragraph))
:config :config
(define-key custom-bindings-map (kbd "C-c .") (cycle-themes))) (define-key custom-bindings-map (kbd "C-c .") (cycle-themes)))