|
Lines 222-231
static void siod_lisp_vars(void)
Link Here
|
| 222 |
cons(flocons(subminor),NIL)))); |
222 |
cons(flocons(subminor),NIL)))); |
| 223 |
|
223 |
|
| 224 |
EST_Pathname etcdircommon = est_libdir; |
224 |
EST_Pathname etcdircommon = est_libdir; |
| 225 |
etcdircommon += "etc"; |
225 |
etcdircommon += "etc/"; |
| 226 |
|
226 |
|
| 227 |
EST_Pathname etcdir = etcdircommon; |
227 |
EST_Pathname etcdir = {{HORRIBLELIBARCHKLUDGE}}; |
| 228 |
etcdir += est_ostype; |
228 |
etcdir += "festival/etc/"; |
| 229 |
|
229 |
|
| 230 |
// Modify my PATH to include these directories |
230 |
// Modify my PATH to include these directories |
| 231 |
siod_set_lval("etc-path",cons(rintern(etcdir), |
231 |
siod_set_lval("etc-path",cons(rintern(etcdir), |
