Mercurial > emacs
diff lisp/cus-edit.el @ 109908:f5eee071d705
* 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 | 90428e3ef1f1 |
children | 280c8ae2476d |
line wrap: on
line diff
--- 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