suzanne.soy/rackunit
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

misc changes to avoid absolute paths in bytecode files

Browse Source 
In many cases, `path->collects-relative' is used instead of
`path->main-collects-relative' to generalize existing support
for collection-relative paths.

original commit: f87981f96057c26cb311e786a91229bf4a874e5b
This commit is contained in:
Matthew Flatt 2013-07-08 12:22:10 -06:00
parent f0192efed2
commit a860a2387b
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
pkgs/gui-pkgs/gui-lib/rackunit/private/gui/drracket-ui.rkt
View File

@ -1,6 +1,5 @@
#lang racket/base #lang racket/base
(require mzlib/etc (require "drracket-link.rkt")
"drracket-link.rkt")
;; Procedures which *may* be overridden by DrRacket to do useful things. ;; Procedures which *may* be overridden by DrRacket to do useful things.
;; Or they may not be. ;; Or they may not be.
@ -49,7 +48,7 @@
(not (regexp-match? (not (regexp-match?
(regexp-quote (regexp-quote
(path->string (path->string
(this-expression-source-directory))) (collection-path "rackunit" "private" "gui")))
(path->string src))))))) (path->string src)))))))
srclocs))) srclocs)))