From: Chris Hanson <org/chris-hanson/cph>
Date: Mon, 6 Feb 2006 18:43:01 +0000 (+0000)
Subject: Fix compiler warning.
X-Git-Tag: 20090517-FFI~1099
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=d4e5a6f68733b794d6619b58e18e14e6ba4d561e;p=mit-scheme.git

Fix compiler warning.
---

diff --git a/v7/src/edwin/macros.scm b/v7/src/edwin/macros.scm
index 5fb30f8e5..1ee7fc1c7 100644
--- a/v7/src/edwin/macros.scm
+++ b/v7/src/edwin/macros.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: macros.scm,v 1.76 2006/02/06 18:40:29 cph Exp $
+$Id: macros.scm,v 1.77 2006/02/06 18:43:01 cph Exp $
 
 Copyright 1987,1989,1991,1992,1993,1995 Massachusetts Institute of Technology
 Copyright 1999,2001,2002,2006 Massachusetts Institute of Technology
@@ -34,6 +34,7 @@ USA.
 (define-syntax define-editor-alias
   (sc-macro-transformer
    (lambda (form env)
+     env
      (if (syntax-match? '(SYMBOL SYMBOL SYMBOL) (cdr form))
 	 (let ((type (cadr form))
 	       (new (caddr form))