From 1ae794275420d7002794e26137abf6ec1a8cb406 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Sun, 16 Aug 2009 15:40:50 +0000 Subject: (lisp-indent-region): Remove unused function. --- lisp/emacs-lisp/lisp-mode.el | 10 ---------- 1 file changed, 10 deletions(-) (limited to 'lisp/emacs-lisp') diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index 49c35770dd7..3360600fbff 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -1340,16 +1340,6 @@ ENDPOS is encountered." (setq outer-loop-done (= (point) last-point)) (setq last-point (point))))))) -(defun lisp-indent-region (start end) - "Indent every line whose first char is between START and END inclusive." - (save-excursion - (let ((endmark (copy-marker end))) - (goto-char start) - (and (bolp) (not (eolp)) - (lisp-indent-line)) - (indent-sexp endmark) - (set-marker endmark nil)))) - (defun indent-pp-sexp (&optional arg) "Indent each line of the list starting just after point, or prettyprint it. A prefix argument specifies pretty-printing." -- cgit v1.2.3