Mercurial > emacs

changeset 64003:bf6ae7cf12eb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(columns): Finish `defgroup' description with period. (delimit-columns-rectangle-line): "?\ " -> "?\s".
author Juanma Barranquero <lekktu@gmail.com>
date Mon, 04 Jul 2005 01:53:04 +0000
parents 47749dcdbecf
children ea880752de3b
files lisp/delim-col.el
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/delim-col.el	Mon Jul 04 01:51:25 2005 +0000
+++ b/lisp/delim-col.el	Mon Jul 04 01:53:04 2005 +0000
@@ -125,7 +125,7 @@
 ;; User Options:
 
 (defgroup columns nil
-  "Prettify columns"
+  "Prettify columns."
   :link '(emacs-library-link :tag "Source Lisp File" "delim-col.el")
   :prefix "delimit-columns-"
   :group 'internal)
@@ -424,13 +424,13 @@
        (and delimit-columns-format
 	    (make-string (- (aref delimit-columns-max ncol)
 			    (- (current-column) origin))
-			 ?\ )))
+			 ?\s)))
       (setq ncol (1+ ncol)))
     ;; Prepare last column spaces
     (let ((spaces (and delimit-columns-format
 		       (make-string (- (aref delimit-columns-max ncol)
 				       (- (current-column) origin))
-				    ?\ ))))
+				    ?\s))))
       ;; Adjust extra columns, if needed
       (and delimit-columns-extra
 	   (while (and (< (setq ncol (1+ ncol)) len)
@@ -438,7 +438,7 @@
 	     (delimit-columns-format spaces)
 	     (setq spaces (and delimit-columns-format
 			       (make-string (aref delimit-columns-max ncol)
-					    ?\ )))))
+					    ?\s)))))
       ;; insert last formating
       (cond ((null delimit-columns-format)
 	     (insert delimit-columns-after delimit-columns-str-after))