Fix data message

track-calorie-values.el

@@ -78,9 +78,9 @@ Keys are names, values are calories.")
 (defun track-calorie-values-save-data ()
   "Write calorie data."
   (when track-calorie-values-modified-p
-    (insert ";; generated by track-calorie-values.el        -*- mode: lisp-data -*-\n"
-            ";; do not modify by hand\n")
     (with-temp-buffer
+      (insert ";; generated by track-calorie-values.el        -*- mode: lisp-data -*-\n"
+              ";; do not modify by hand\n\n")
       (let ((standard-output (current-buffer)))
         (print `(setq track-calorie-values-data ,track-calorie-values-data)))
       (write-region (point-min) (point-max) track-calorie-values-save-file))))