emacs: touch the custom-file

.emacs.d/init.el

@@ -46,6 +46,11 @@ value `italic'."
             (apply #'set-face-attribute
                    `(,(car l) t ,@(cdr l))))
         list-of-lists))
+(defun touch (file-name)
+  "Create FILE-NAME or update its modified date."
+  (find-file custom-file)
+  (save-buffer)
+  (kill-current-buffer))
 
 ;; other key binds
 (global-set-key (kbd "C-c e r") 'reindent-buffer)
@@ -253,6 +258,7 @@ value `italic'."
 
 ;; custom
 (setq custom-file "~/.emacs.d/custom.el")
+(touch custom-file)
 (load custom-file)
 
 ;; catppuccin theme