Fixes to last set of changes.

diff --git a/v7/src/edwin/c-mode.scm b/v7/src/edwin/c-mode.scm
index 959356bf502f580f4d0da53aa827b81d1bf03af8..536430434adec5271eae3f85e08aba384f634b07 100644 (file)
--- a/v7/src/edwin/c-mode.scm
+++ b/v7/src/edwin/c-mode.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;    $Id: c-mode.scm,v 1.50 1992/11/17 17:35:02 cph Exp $
+;;;    $Id: c-mode.scm,v 1.51 1992/11/17 17:37:47 cph Exp $
 ;;;
 ;;;    Copyright (c) 1986, 1989-92 Massachusetts Institute of Technology
 ;;;
@@ -127,7 +127,7 @@ Settings for K&R and BSD indentation styles are
     (define-variable-local-value! buffer
        (ref-variable-object comment-indent-hook)
       c-mode:comment-indent)
-    (event-distributor/invoke! (ref-variable c-mode-hook) buffer)))
+    (event-distributor/invoke! (ref-variable c-mode-hook buffer) buffer)))
 \f
 (define-variable c-mode-hook
   "An event distributor that is invoked when entering C mode."

diff --git a/v7/src/edwin/info.scm b/v7/src/edwin/info.scm
index 8478488c7ba4066b6fb7358f4127a255082a3747..baf2ccdaf46e651802af2c1f20e633565f52e0eb 100644 (file)
--- a/v7/src/edwin/info.scm
+++ b/v7/src/edwin/info.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;    $Id: info.scm,v 1.113 1992/11/16 22:41:03 cph Exp $
+;;;    $Id: info.scm,v 1.114 1992/11/17 17:38:12 cph Exp $
 ;;;
 ;;;    Copyright (c) 1986, 1989-92 Massachusetts Institute of Technology
 ;;;
@@ -140,7 +140,7 @@ s   Search through this Info file for specified regexp,
     (define-variable-local-value! buffer (ref-variable-object case-fold-search)
       true)
     (define-variable-local-value! buffer (ref-variable-object info-history)
-      (ref-variable info-history))
+      (ref-variable info-history buffer))
     (define-variable-local-value! buffer
        (ref-variable-object info-current-file)
       false)