[slime-cvs] CVS slime

[CVS User heller]

Update of /project/slime/cvsroot/slime
In directory cl-net:/tmp/cvs-serv18980

Modified Files:
	ChangeLog slime.el 
Log Message:
The compiler warns about various stuff. Fix some of it.

* slime.el (slime-add-local-hook): Remove support for Emacs 20.
(sldb-recenter-region): Use forward-line; not next-line.

Patch by Mark Harig.

--- /project/slime/cvsroot/slime/ChangeLog	2010/02/17 17:04:59	1.1987
+++ /project/slime/cvsroot/slime/ChangeLog	2010/02/18 18:46:02	1.1988
@@ -1,3 +1,10 @@
+2010-02-18  Mark Harig <idirectscm at aim.com>
+
+	The compiler warns about various stuff. Fix some of it.
+
+	* slime.el (slime-add-local-hook): Remove support for Emacs 20.
+	(sldb-recenter-region): Use forward-line; not next-line.
+
 2010-02-17  Helmut Eller  <heller at common-lisp.net>
 
 	Add a command to eval stuff in the inspector.
--- /project/slime/cvsroot/slime/slime.el	2010/02/17 17:04:46	1.1276
+++ /project/slime/cvsroot/slime/slime.el	2010/02/18 18:46:02	1.1277
@@ -5665,7 +5665,7 @@
                  (t
                   (goto-char start)
                   (unless noninteractive ; for running the test suite
-                    (next-line (- (window-height) 2)))))))))
+                    (forward-line (- (window-height) 2)))))))))
 
 ;; not sure yet, whether this is a good idea.
 (defmacro slime-save-coordinates (origin &rest body)
@@ -8540,9 +8540,6 @@
 
 (defun slime-add-local-hook (hook function &optional append)
   (cond ((featurep 'xemacs) (add-local-hook hook function append))
-        ((< emacs-major-version 21)
-         (make-local-hook hook)
-         (add-hook hook function append t))
         (t (add-hook hook function append t))))
 
 (defun slime-run-mode-hooks (&rest hooks)