Fix bug in last edit -- DEFINE-VARIABLE-LOCAL-VALUE! is not a macro.

diff --git a/v7/src/edwin/artdebug.scm b/v7/src/edwin/artdebug.scm
index 43b73a903a8547da13231202ab2a8438e5ffeaed..3229e3584e2e3ba9437fbf3fdf03f8c83c9bca55 100644 (file)
--- a/v7/src/edwin/artdebug.scm
+++ b/v7/src/edwin/artdebug.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;    $Id: artdebug.scm,v 1.20 1992/11/22 17:04:18 gjr Exp $
+;;;    $Id: artdebug.scm,v 1.21 1992/11/23 21:15:33 gjr Exp $
 ;;;
 ;;;    Copyright (c) 1989-1992 Massachusetts Institute of Technology
 ;;;
@@ -389,11 +389,14 @@ Miscellany
 
 Use \\[kill-buffer] to quit the debugger."
   (lambda (buffer)
-    (define-variable-local-value! buffer comint-input-ring
+    (define-variable-local-value! buffer
+      (ref-variable-object comint-input-ring)
       (make-ring (ref-variable comint-input-ring-size)))
-    (define-variable-local-value! buffer evaluation-input-recorder
+    (define-variable-local-value! buffer
+      (ref-variable-object evaluation-input-recorder)
       continuation-browser-input-recorder)
-    (define-variable-local-value! buffer evaluation-output-receiver
+    (define-variable-local-value! buffer
+      (ref-variable-object evaluation-output-receiver)
       continuation-browser-output-receiver)))
 
 (define (continuation-browser-input-recorder region)