diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2009-08-16 15:40:50 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2009-08-16 15:40:50 +0000 |
| commit | 1ae794275420d7002794e26137abf6ec1a8cb406 (patch) | |
| tree | 609682473c81e8381da0735290ec7738d4e4f719 /lisp/emacs-lisp/lisp-mode.el | |
| parent | c3732cb8022b9ce4c37eadede081d82558ec1548 (diff) | |
| download | emacs-1ae794275420d7002794e26137abf6ec1a8cb406.tar.gz | |
(lisp-indent-region): Remove unused function.
Diffstat (limited to 'lisp/emacs-lisp/lisp-mode.el')
| -rw-r--r-- | lisp/emacs-lisp/lisp-mode.el | 10 |
1 files changed, 0 insertions, 10 deletions
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." |