From 65f268c860571158fff9aca4b0b8d083e2443e14 Mon Sep 17 00:00:00 2001
From: Jose Antonio Ortega Ruiz <jao@gnu.org>
Date: Wed, 1 Apr 2009 07:45:32 +0200
Subject: Bug fix: really remove killed buffers from the list of closed repls.

---
 scheme/guile/geiser/xref.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'scheme/guile/geiser/xref.scm')

diff --git a/scheme/guile/geiser/xref.scm b/scheme/guile/geiser/xref.scm
index ec86d7c..33821b7 100644
--- a/scheme/guile/geiser/xref.scm
+++ b/scheme/guile/geiser/xref.scm
@@ -72,7 +72,7 @@
     (make-xref proc name (symbol-module name))))
 
 (define (callers sym)
-  (let ((mod (symbol-module sym)))
+  (let ((mod (symbol-module sym #t)))
     (and mod
          (map procedure-xref (procedure-callers (cons mod sym))))))
 
-- 
cgit v1.2.3