[slime-devel] slime-reindent-defun

[Gábor Melis]

Now that it's fixed in the repl it breaks in lisp buffer with
'wrong type argument: number-or-marker-p, nil'

Index: slime.el
===================================================================
RCS file: /project/slime/cvsroot/slime/slime.el,v
retrieving revision 1.794
diff -u -p -r1.794 slime.el
--- slime.el	28 Jun 2007 12:27:51 -0000	1.794
+++ slime.el	6 Jul 2007 16:21:16 -0000
@@ -10047,7 +10047,9 @@ be treated as a paragraph.  This is usef
         (fill-paragraph nil)
       (let ((start (progn (unless (or (and (zerop (current-column))
                                            (eq ?\( (char-after)))
-                                      (slime-repl-at-prompt-start-p))
+                                      (and (boundp 'slime-repl-input-start-mark)
+                                           slime-repl-input-start-mark
+                                           (slime-repl-at-prompt-start-p)))
                             (slime-beginning-of-defun))
                           (point)))
             (end (ignore-errors (slime-end-of-defun) (point))))