diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2011-04-19 15:44:55 +0200 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2011-04-19 15:44:55 +0200 |
| commit | 06b605171f1c9d8b42bd3326a243b8b03d2e4e58 (patch) | |
| tree | e96c135042999136bf0e75d113aae306e51983e3 /lisp/rect.el | |
| parent | 04c569546ad52f6270d8fc6d4aa0750950a0ac05 (diff) | |
| download | emacs-06b605171f1c9d8b42bd3326a243b8b03d2e4e58.tar.gz emacs-06b605171f1c9d8b42bd3326a243b8b03d2e4e58.tar.bz2 emacs-06b605171f1c9d8b42bd3326a243b8b03d2e4e58.zip | |
lisp/*.el: Lexical-binding cleanup.
Diffstat (limited to 'lisp/rect.el')
| -rw-r--r-- | lisp/rect.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/rect.el b/lisp/rect.el index 174e31f87d0..ad914cab7d2 100644 --- a/lisp/rect.el +++ b/lisp/rect.el @@ -281,7 +281,7 @@ no text on the right side of the rectangle." (= (point) (point-at-eol))) (indent-to endcol)))) -(defun delete-whitespace-rectangle-line (startcol endcol fill) +(defun delete-whitespace-rectangle-line (startcol _endcol fill) (when (= (move-to-column startcol (if fill t 'coerce)) startcol) (unless (= (point) (point-at-eol)) (delete-region (point) (progn (skip-syntax-forward " ") (point)))))) @@ -373,7 +373,7 @@ rectangle which were empty." ;; Line numbers for `rectangle-number-line-callback'. (defvar rectangle-number-line-counter) -(defun rectangle-number-line-callback (start end format-string) +(defun rectangle-number-line-callback (start _end format-string) (move-to-column start t) (insert (format format-string rectangle-number-line-counter)) (setq rectangle-number-line-counter |