On Sun, Nov 10, 2019 at 4:45 PM Jon Zeppieri <zeppi...@gmail.com> wrote:
>
> On Sun, Nov 10, 2019 at 3:26 PM Jon Zeppieri <zeppi...@gmail.com> wrote:
> > =====
> > ;; If the tzdata package is installed, put its zoneinfo directory at
> > ;; the head of the search path.
> > (define-runtime-path-list tzdata-paths
> > (match (find-relevant-directories '(tzdata-zoneinfo-module-path))
> > [(cons info-dir _)
> > (define path ((get-info/full info-dir) 'tzdata-zoneinfo-module-path))
> > (list path)]
> > [_
> > null]))
>
> I also tried doing the getinfo stuff at expansion time (so, at phase
> 2, when the RHS of `define-runtime-path` is running at phase 1, and at
> phase 1 when it's running at phase 0 -- it does also run at phase 0,
> right?), but that didn't help.
And I just tried this, with no luck:
(define-runtime-path-list tzdata-paths
(with-handlers ([exn:fail:filesystem:missing-module? (λ (_) null)])
(list
(resolved-module-path-name
((current-module-name-resolver) '(lib "tzdata/zoneinfo"
"tzinfo") #f #f #f)))))
The files did show up in the raco distribute bundle, but apparently
the code can't find them, which suggests that the
current-module-name-resolver isn't set to look for them there.
--
You received this message because you are subscribed to the Google Groups
"Racket Users" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to racket-users+unsubscr...@googlegroups.com.
To view this discussion on the web visit
https://groups.google.com/d/msgid/racket-users/CAKfDxxyiS7eE1zYEWM_8t%2BxEXUajn27OWLe%2BhfqjVeKTS5K4Ww%40mail.gmail.com.
