Fixed fetching of uninstalled manual in Help Desk.
svn: r7392
This commit is contained in:
parent
0026912589
commit
024da65493
|
@ -171,7 +171,8 @@
|
||||||
(a ((mzscheme
|
(a ((mzscheme
|
||||||
,(to-string/escape-quotes
|
,(to-string/escape-quotes
|
||||||
`((dynamic-require '(lib "refresh-manuals.ss" "help") 'refresh-manuals)
|
`((dynamic-require '(lib "refresh-manuals.ss" "help") 'refresh-manuals)
|
||||||
(list (cons (bytes->path ,(path->bytes manual))
|
(list (cons ((dynamic-require '(lib "refresh-manuals.ss" "help") 'bytes-to-path)
|
||||||
|
,(path->bytes manual))
|
||||||
,name))))))
|
,name))))))
|
||||||
,name)
|
,name)
|
||||||
,(if (and manual-path
|
,(if (and manual-path
|
||||||
|
|
Loading…
Reference in New Issue
Block a user