procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(delimit-columns-rectangle-max): Do not double variables in the lambda-list.

Browse source 
(delimit-columns-rectangle-line): Do not double variables in the lambda-list.
This commit is contained in:
Pavel Janík 2001-10-13 08:13:34 +00:00
parent 906f211e1b
commit a2bdcec408
2 changed files with 15 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
lisp/ChangeLog
View file

@ -1,3 +1,15 @@
2001-10-13 Pavel Jan,Bm(Bk <Pavel@Janik.cz>
* mail/mailalias.el (mail-directory-stream): Do not double
variables in the lambda-list.
* play/gomoku.el (gomoku-init-display): Ditto.
* play/landmark.el (lm-init-display): Ditto.
* delim-col.el (delimit-columns-rectangle-max): Ditto.
(delimit-columns-rectangle-line): Ditto.
2001-10-12 Stefan Monnier <monnier@cs.yale.edu>
* newcomment.el (comment-region-internal): Don't rebind

6
lisp/delim-col.el
View file

@ -4,7 +4,7 @@
;; Author: Vinicius Jose Latorre <vinicius@cpqd.com.br>
;; Maintainer: Vinicius Jose Latorre <vinicius@cpqd.com.br>
;; Time-stamp: <2001-07-15 11:12:35 pavel>
;; Time-stamp: <2001-10-13 10:02:26 pavel>
;; Version: 2.1
;; Keywords: internal
;; X-URL: http://www.cpqd.com.br/~vinicius/emacs/
@ -362,7 +362,7 @@ START and END delimits the corners of text rectangle."
(defvar delimit-columns-limit nil)
(defun delimit-columns-rectangle-max (startpos &optional ignore ignore)
(defun delimit-columns-rectangle-max (startpos &optional ignore1 ignore2)
(set-marker delimit-columns-limit (point))
(goto-char startpos)
(let ((ncol 1)
@ -395,7 +395,7 @@ START and END delimits the corners of text rectangle."
(setq values (cdr values)))))
(defun delimit-columns-rectangle-line (startpos &optional ignore ignore)
(defun delimit-columns-rectangle-line (startpos &optional ignore1 ignore2)
(let ((len (length delimit-columns-max))
(ncol 0)
origin)