Mercurial > emacs

changeset 79660:6fa5fc37cfee

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Whitespace change.
author Richard M. Stallman <rms@gnu.org>
date Mon, 31 Dec 2007 03:43:15 +0000
parents a4773f405434
children c273395cbfd3 6a0c500ca3a9
files lisp/cus-edit.el
diffstat 1 files changed, 16 insertions(+), 16 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/cus-edit.el	Mon Dec 31 03:42:51 2007 +0000
+++ b/lisp/cus-edit.el	Mon Dec 31 03:43:15 2007 +0000
@@ -2344,22 +2344,22 @@
            (when links
              (let ((pt (point))
                    (left-margin (+ left-margin 2)))
-	     (insert "\n" (or doc-initial-string "Group documentation:") " ")
-             (while links
-               (push (widget-create-child-and-convert
-		      widget (car links)
-		      :button-face 'custom-link
-		      :mouse-face 'highlight
-		      :pressed-face 'highlight)
-                     buttons)
-               (setq links (cdr links))
-               (cond ((null links)
-                      (insert ".\n"))
-                     ((null (cdr links))
-                      (if many
-                          (insert ", and ")
-                        (insert " and ")))
-                     (t
+	       (insert "\n" (or doc-initial-string "Group documentation:") " ")
+	       (while links
+		 (push (widget-create-child-and-convert
+			widget (car links)
+			:button-face 'custom-link
+			:mouse-face 'highlight
+			:pressed-face 'highlight)
+		       buttons)
+		 (setq links (cdr links))
+		 (cond ((null links)
+			(insert ".\n"))
+		       ((null (cdr links))
+			(if many
+			    (insert ", and ")
+			  (insert " and ")))
+		       (t
                         (insert ", "))))
                (fill-region-as-paragraph pt (point))
                (delete-to-left-margin (1+ pt) (+ pt 2))))))