From: Gerd Moellmann Date: Mon, 30 Oct 2000 12:14:11 +0000 (+0000) Subject: Little fix: replace delimit-columns-align-columns by X-Git-Tag: emacs-pretest-21.0.90~422 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=35923e46af5dd849f576255a4be9d64945311d42;p=emacs.git Little fix: replace delimit-columns-align-columns by delimit-columns-format. (delimit-columns-region, delimit-columns-rectangle): Code fix. --- diff --git a/lisp/delim-col.el b/lisp/delim-col.el index 1cac7ce3ed1..749130c2a04 100644 --- a/lisp/delim-col.el +++ b/lisp/delim-col.el @@ -4,8 +4,8 @@ ;; Author: Vinicius Jose Latorre ;; Maintainer: Vinicius Jose Latorre -;; 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 @@ START and END delimits the text region." (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 @@ START and END delimits the corners of text rectangle." 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)))