Mercurial > emacs

changeset 109908:f5eee071d705

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* cus-edit.el (custom-group-value-create): Add extra newline before end line (Bug#6876).
author Chong Yidong <cyd@stupidchicken.com>
date Sat, 21 Aug 2010 10:46:43 -0400
parents 88b82e3838f6
children a1846ab0dc91
files lisp/ChangeLog lisp/cus-edit.el
diffstat 2 files changed, 7 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Sat Aug 21 16:09:46 2010 +0200
+++ b/lisp/ChangeLog	Sat Aug 21 10:46:43 2010 -0400
@@ -4,6 +4,11 @@
 
 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
 	when extending it.  Before killing on the second click, check if
 	the buffer is the correct one.  Doc fix.
--- a/lisp/cus-edit.el	Sat Aug 21 16:09:46 2010 +0200
+++ b/lisp/cus-edit.el	Sat Aug 21 10:46:43 2010 -0400
@@ -4097,8 +4097,8 @@
 	     (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