emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] emacs/lisp ChangeLog emacs-lisp/lisp-mode.el


From: Stefan Monnier
Subject: [Emacs-diffs] emacs/lisp ChangeLog emacs-lisp/lisp-mode.el
Date: Sun, 16 Aug 2009 15:40:53 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        09/08/16 15:40:52

Modified files:
        lisp           : ChangeLog 
        lisp/emacs-lisp: lisp-mode.el 

Log message:
        (lisp-indent-region): Remove unused function.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15948&r2=1.15949
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/emacs-lisp/lisp-mode.el?cvsroot=emacs&r1=1.242&r2=1.243

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15948
retrieving revision 1.15949
diff -u -b -r1.15948 -r1.15949
--- ChangeLog   16 Aug 2009 15:39:11 -0000      1.15948
+++ ChangeLog   16 Aug 2009 15:40:50 -0000      1.15949
@@ -1,5 +1,7 @@
 2009-08-16  Stefan Monnier  <address@hidden>
 
+       * emacs-lisp/lisp-mode.el (lisp-indent-region): Remove unused function.
+
        * term.el: Fix commenting convention, turn comments into docstrings.
 
 2009-08-16  E. Jay Berkenbilt  <address@hidden>  (tiny change)

Index: emacs-lisp/lisp-mode.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/emacs-lisp/lisp-mode.el,v
retrieving revision 1.242
retrieving revision 1.243
diff -u -b -r1.242 -r1.243
--- emacs-lisp/lisp-mode.el     23 Jul 2009 07:09:33 -0000      1.242
+++ emacs-lisp/lisp-mode.el     16 Aug 2009 15:40:52 -0000      1.243
@@ -1340,16 +1340,6 @@
            (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."




reply via email to

[Prev in Thread] Current Thread [Next in Thread]