diff --git a/collects/drscheme/private/debug.ss b/collects/drscheme/private/debug.ss index 0bdcd611e8..361a53b143 100644 --- a/collects/drscheme/private/debug.ss +++ b/collects/drscheme/private/debug.ss @@ -320,7 +320,7 @@ profile todo: (cons (make-weak-box (send rep get-definitions-text)) (send (send rep get-definitions-text) get-edition-number))] [(path? src) - (let ([frame (send (group:get-the-frame-group) locate-frame src)]) + (let ([frame (send (group:get-the-frame-group) locate-file src)]) (and frame (is-a? frame drscheme:unit:frame<%>) (cons (make-weak-box (send frame get-definitions-text))