steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gobject-introspection: using xdg vocab.

windows-high-dpi
John Benediktsson 2018-03-03 16:13:23 -08:00
parent 8d672a382a
commit 75168c1964
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
basis/gobject-introspection/gobject-introspection.factor
View File

@ -4,7 +4,7 @@ USING: accessors assocs combinators environment gobject-introspection.common
gobject-introspection.ffi gobject-introspection.loader gobject-introspection.ffi gobject-introspection.loader
gobject-introspection.types io io.files io.pathnames kernel lexer gobject-introspection.types io io.files io.pathnames kernel lexer
locals make namespaces parser sequences splitting summary vocabs locals make namespaces parser sequences splitting summary vocabs
vocabs.parser xml ; vocabs.parser xdg xml ;
IN: gobject-introspection IN: gobject-introspection
ERROR: gir-not-found name paths ; ERROR: gir-not-found name paths ;
@ -18,8 +18,7 @@ M: gir-not-found summary
<PRIVATE <PRIVATE
: system-gir-dirs ( -- dirs ) : system-gir-dirs ( -- dirs )
"XDG_DATA_DIRS" os-env "/usr/local/share/:/usr/share/" or xdg-data-dirs [ "gir-1.0" append-path ] map ;
":" split [ "gir-1.0" append-path ] map ;
: custom-gir-dirs ( -- dirs ) : custom-gir-dirs ( -- dirs )
"GIR_DIRS" os-env ":" split ; "GIR_DIRS" os-env ":" split ;