projects
/
mit-scheme.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
56f06aa
)
Fixed references to unbound variable.
author
Chris Hanson
<org/chris-hanson/cph>
Mon, 19 Jun 2006 18:03:24 +0000
(18:03 +0000)
committer
Chris Hanson
<org/chris-hanson/cph>
Mon, 19 Jun 2006 18:03:24 +0000
(18:03 +0000)
v7/src/edwin/paredit.scm
patch
|
blob
|
history
diff --git
a/v7/src/edwin/paredit.scm
b/v7/src/edwin/paredit.scm
index ace2075413d6a362fa01ec5d86d57870236f3331..99ebe58878262e20ad33f8210d828dffa66b7f64 100644
(file)
--- 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)