Change find-file-hooks to pass the buffer to the event receivers.

diff --git a/v7/src/edwin/filcom.scm b/v7/src/edwin/filcom.scm
index 726e2d109831d4ba809b77619c61072b0586d1c4..25ee58a47dbc7f9feef143a3c8d3bf55f2251218 100644 (file)
--- a/v7/src/edwin/filcom.scm
+++ b/v7/src/edwin/filcom.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;    $Id: filcom.scm,v 1.175 1993/08/10 06:40:36 cph Exp $
+;;;    $Id: filcom.scm,v 1.176 1993/09/08 19:50:18 cph Exp $
 ;;;
 ;;;    Copyright (c) 1986, 1989-93 Massachusetts Institute of Technology
 ;;;
@@ -172,7 +172,7 @@ invocation."
                           "write-protected"
                           "doesn't exist")))))))))
     (normal-mode buffer true)
-    (event-distributor/invoke! (ref-variable find-file-hooks buffer))
+    (event-distributor/invoke! (ref-variable find-file-hooks buffer) buffer)
     (load-find-file-initialization buffer pathname)))
 
 (define (file-test-no-errors test pathname)