diff options
Diffstat (limited to 'scheme/guile/geiser/xref.scm')
| -rw-r--r-- | scheme/guile/geiser/xref.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scheme/guile/geiser/xref.scm b/scheme/guile/geiser/xref.scm index 18005ee..4f1b2cc 100644 --- a/scheme/guile/geiser/xref.scm +++ b/scheme/guile/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))) |