diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-06-07 01:25:14 +0200 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-06-07 01:25:14 +0200 |
| commit | 6212ff6e6928d2844ff3b8ff5a40f4e714685262 (patch) | |
| tree | 12ab92296db48b623f72a43b16b9ae9ae51b8bbd /geiser/xref.scm | |
| parent | 90835ae8e3ad9763e1a8d1135e337c0855ec3daf (diff) | |
| download | geiser-guile-6212ff6e6928d2844ff3b8ff5a40f4e714685262.tar.gz geiser-guile-6212ff6e6928d2844ff3b8ff5a40f4e714685262.tar.bz2 | |
Guile: real fix for symbol locations (needs Guile's git head).
Diffstat (limited to 'geiser/xref.scm')
| -rw-r--r-- | geiser/xref.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/geiser/xref.scm b/geiser/xref.scm index 060bec4..18005ee 100644 --- a/geiser/xref.scm +++ b/geiser/xref.scm @@ -55,7 +55,7 @@ (define (program-path p) (let* ((mod (program-module p)) (name (and mod (module-name mod)))) - (and name (module-filename name)))) + (and name (module-path name)))) (define (procedure-xref proc . mod-name) (let ((proc-name (or (procedure-name proc) '<anonymous>)) |