1:- module(config, [expand_dir_name/2]).    2
    3expand_dir_name(X, Y):- dir_data(X, Y0), !,
    4	getenv(home, H),
    5	atomics_to_string([H, Y0], "/", Y).
    6expand_dir_name(X, X).
    7
    8dir_data(home, "").
    9dir_data(tmp,   "tmp").
   10dir_data(pacpl7, "lib/swipl/pack/pac/prolog/pac").
   11dir_data(texmf,  "TeXLive/texmf-var").
   12dir_data(ptex,  "TeXLive/texmf-var/tex/latex/ptex").
   13dir_data(macro,  "TeXLive/texmf-var/tex/latex/ptex/private").
   14dir_data(bib,   "TeXLive/texmf-var/bibtex/bib").
   15dir_data(html,  "public_html").
   16dir_data(paccgi7, "public_html/paccgi7").
   17% dir_data(preambles,   "cabinet/TeX/preambles").
   18% dir_data(notes, "cabinet/notes/notes-in-tex").