From 90c5bea2e37e68ec43004df3f9b5a9dfc34c79dd Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Wed, 25 Jul 2007 12:39:03 +0000 Subject: [PATCH] use define-runtime-path for SRFI-29 bundles sub-directory svn: r6955 --- collects/srfi/29/localization.ss | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/collects/srfi/29/localization.ss b/collects/srfi/29/localization.ss index defb44362d..7e3ee920b6 100644 --- a/collects/srfi/29/localization.ss +++ b/collects/srfi/29/localization.ss @@ -23,7 +23,8 @@ ;;; Modified for PLT Scheme by: Francisco Solsona (module localization mzscheme - (require (lib "etc.ss")) + (require (lib "etc.ss") + (lib "runtime-path.ss")) (provide current-language current-country current-locale-details load-bundle! store-bundle! declare-bundle! localized-template @@ -94,8 +95,7 @@ (current-locale-details (get-from-locale 'details)))) ;; System bundles are here: - (define system-bundles (build-path - (collection-path "srfi") "29" "bundles")) + (define-runtime-path system-bundles "bundles") ;; bundle-specifier: (listof symbol) ;; i.e. package + locale, (package-name [language] [country] [details ...])