|
|
@@ -116,12 +116,11 @@
|
|
|
"On save, update 'date: lines at start of file and in current block"
|
|
|
(interactive)
|
|
|
(progn
|
|
|
- (message "gmj-update-save-date-hook start")
|
|
|
(gmj/update-date-current-block)
|
|
|
(gmj/update-date-first-n-lines 10)
|
|
|
- (message "gmj-update-save-date-hook end"))
|
|
|
- )
|
|
|
-
|
|
|
+ )
|
|
|
+ )
|
|
|
+
|
|
|
(add-hook 'before-save-hook 'gmj-update-date-save-hook)
|
|
|
#+end_src
|
|
|
|
