From: Chris Hanson <org/chris-hanson/cph>
Date: Mon, 19 Jun 2006 18:03:24 +0000 (+0000)
Subject: Fixed references to unbound variable.
X-Git-Tag: 20090517-FFI~1002
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=d9d91811fed8256057fc162a5e94300eb42de7e7;p=mit-scheme.git

Fixed references to unbound variable.
---

diff --git a/v7/src/edwin/paredit.scm b/v7/src/edwin/paredit.scm
index ace207541..99ebe5887 100644
--- a/v7/src/edwin/paredit.scm
+++ b/v7/src/edwin/paredit.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: paredit.scm,v 1.2 2006/06/19 18:02:55 cph Exp $
+$Id: paredit.scm,v 1.3 2006/06/19 18:03:24 cph Exp $
 
 This code is written by Taylor R. Campbell and placed in the Public
 Domain.  All warranties are disclaimed.
@@ -632,7 +632,7 @@ With a numerical prefix argument N, kill N S-expressions backward in
         ((negative? argument)
          (save-excursion
           (lambda ()
-            (let loop ((n n))
+            (let loop ((n argument))
               (cond ((not (zero? n))
                      (modify-current-point! backward-one-sexp)
                      (lisp-indent-line #f)