summaryrefslogtreecommitdiff
path: root/scheme/guile
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2009-04-01 11:54:01 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2009-04-01 11:54:01 +0200
commitc53bdcf0574384c12b18ee27158d9d6ae8238e4f (patch)
tree4e061bd024c8fe03ed9450dca875bf8ea7545d46 /scheme/guile
parent65f268c860571158fff9aca4b0b8d083e2443e14 (diff)
downloadgeiser-chez-c53bdcf0574384c12b18ee27158d9d6ae8238e4f.tar.gz
geiser-chez-c53bdcf0574384c12b18ee27158d9d6ae8238e4f.tar.bz2
Better xref display.
Diffstat (limited to 'scheme/guile')
-rw-r--r--scheme/guile/geiser/xref.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/scheme/guile/geiser/xref.scm b/scheme/guile/geiser/xref.scm
index 33821b7..059fbb0 100644
--- a/scheme/guile/geiser/xref.scm
+++ b/scheme/guile/geiser/xref.scm
@@ -52,7 +52,7 @@
(and proc
`((location . ,(or (program-location proc) (symbol-location name)))
(signature . ,(object-signature name proc))
- (module . ,module))))
+ (module . ,(or module '())))))
(define (program-location p)
(cond ((not (program? p)) #f)