| /svarlang.lib/trunk/autoload.c |
|---|
| 22,17 → 22,9 |
| * DEALINGS IN THE SOFTWARE. |
| */ |
| #include <stdlib.h> |
| #include "svarlang.h" |
| int svarlang_autoload(const char *progname) { |
| const char *s; |
| char langid[3]; |
| s = getenv("LANG"); |
| if ((s == NULL) || (*s == 0)) return(-1); |
| langid[0] = s[0]; |
| langid[1] = s[1]; |
| langid[2] = 0; |
| return(svarlang_load(progname, langid, getenv("NLSPATH"))); |
| if (svarlang_autoload_nlspath(progname) == 0) return(0); |
| return(-1); |
| } |