aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman2007-12-31 03:43:15 +0000
committerRichard M. Stallman2007-12-31 03:43:15 +0000
commit76564e7ce3b5e888e3260dd3510c3cf1a254f7da (patch)
tree60c6308d7138f5df043fdc1a82c626dbf769d085
parentf1201e3aedbfc10420ac6dd2427d3453383bee8a (diff)
downloademacs-76564e7ce3b5e888e3260dd3510c3cf1a254f7da.tar.gz
emacs-76564e7ce3b5e888e3260dd3510c3cf1a254f7da.zip
Whitespace change.
-rw-r--r--lisp/cus-edit.el32
1 files changed, 16 insertions, 16 deletions
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index f17e6de758a..941e1ec5e7c 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -2344,22 +2344,22 @@ If INITIAL-STRING is non-nil, use that rather than \"Parent groups:\"."
2344 (when links 2344 (when links
2345 (let ((pt (point)) 2345 (let ((pt (point))
2346 (left-margin (+ left-margin 2))) 2346 (left-margin (+ left-margin 2)))
2347 (insert "\n" (or doc-initial-string "Group documentation:") " ") 2347 (insert "\n" (or doc-initial-string "Group documentation:") " ")
2348 (while links 2348 (while links
2349 (push (widget-create-child-and-convert 2349 (push (widget-create-child-and-convert
2350 widget (car links) 2350 widget (car links)
2351 :button-face 'custom-link 2351 :button-face 'custom-link
2352 :mouse-face 'highlight 2352 :mouse-face 'highlight
2353 :pressed-face 'highlight) 2353 :pressed-face 'highlight)
2354 buttons) 2354 buttons)
2355 (setq links (cdr links)) 2355 (setq links (cdr links))
2356 (cond ((null links) 2356 (cond ((null links)
2357 (insert ".\n")) 2357 (insert ".\n"))
2358 ((null (cdr links)) 2358 ((null (cdr links))
2359 (if many 2359 (if many
2360 (insert ", and ") 2360 (insert ", and ")
2361 (insert " and "))) 2361 (insert " and ")))
2362 (t 2362 (t
2363 (insert ", ")))) 2363 (insert ", "))))
2364 (fill-region-as-paragraph pt (point)) 2364 (fill-region-as-paragraph pt (point))
2365 (delete-to-left-margin (1+ pt) (+ pt 2)))))) 2365 (delete-to-left-margin (1+ pt) (+ pt 2))))))