branch: elpa/geiser-guile
commit 7b83e4a2c6a0482fcaf5804ad558a44acc2fbb24
Author: Jose Antonio Ortega Ruiz <[email protected]>
Commit: Jose Antonio Ortega Ruiz <[email protected]>
Guile: dead elisp code elimination.
---
geiser/xref.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/geiser/xref.scm b/geiser/xref.scm
index 18005ee..4f1b2cc 100644
--- a/geiser/xref.scm
+++ b/geiser/xref.scm
@@ -60,7 +60,7 @@
(define (procedure-xref proc . mod-name)
(let ((proc-name (or (procedure-name proc) '<anonymous>))
(mod-name (if (null? mod-name)
- (symbol-module name)
+ (symbol-module proc-name)
(car mod-name))))
(make-xref proc proc-name mod-name)))
