Mercurial > emacs
changeset 33056:6566390db905
Little fix: replace delimit-columns-align-columns by
delimit-columns-format.
(delimit-columns-region, delimit-columns-rectangle): Code fix.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Mon, 30 Oct 2000 12:14:11 +0000 |
| parents | 968a0ee6275f |
| children | a4b7690c68da |
| files | lisp/delim-col.el |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/delim-col.el Mon Oct 30 06:25:26 2000 +0000 +++ b/lisp/delim-col.el Mon Oct 30 12:14:11 2000 +0000 @@ -4,8 +4,8 @@ ;; Author: Vinicius Jose Latorre <vinicius@cpqd.com.br> ;; Maintainer: Vinicius Jose Latorre <vinicius@cpqd.com.br> -;; Time-stamp: <2000/10/23 10:51:25 vinicius> -;; Version: 2.0 +;; Time-stamp: <2000/10/24 10:35:58 vinicius> +;; Version: 2.1 ;; Keywords: internal ;; X-URL: http://www.cpqd.com.br/~vinicius/emacs/ @@ -293,7 +293,7 @@ (goto-char start) (beginning-of-line) ;; get maximum length for each column - (and delimit-columns-align-columns + (and delimit-columns-format (save-excursion (while (< (point) the-end) (delimit-columns-rectangle-max @@ -356,7 +356,7 @@ delimit-columns-max) (when (<= delimit-columns-start delimit-columns-end) ;; get maximum length for each column - (and delimit-columns-align-columns + (and delimit-columns-format (save-excursion (operate-on-rectangle 'delimit-columns-rectangle-max start the-end nil)))