* cus-edit.el (custom-group-value-create): Add extra newline before end line (Bug#6876).

lisp/ChangeLog

@@ -2,6 +2,11 @@
 
 	* vc/add-log.el (add-log-file-name): Don't get confused by symlinks.
 
+2010-08-21  Chong Yidong  <cyd@stupidchicken.com>
+
+	* cus-edit.el (custom-group-value-create): Add extra newline
+	before end line (Bug#6876).
+
 2010-08-21  Chong Yidong  <cyd@stupidchicken.com>
 
 	* mouse.el (mouse-save-then-kill): Don't save region to kill ring

lisp/cus-edit.el

@@ -4097,8 +4097,8 @@ If GROUPS-ONLY non-nil, return only those members that are groups."
 	     (custom-group-state-update widget)
 	     (progress-reporter-done reporter))
 	   ;; End line
-	   (let ((p (point)))
-	     (insert "\n")
+	   (let ((p (1+ (point))))
+	     (insert "\n\n")
 	     (put-text-property p (1+ p) 'face '(:underline t))
 	     (overlay-put (make-overlay p (1+ p))
 			  'before-string