Subversion Repositories SvarDOS

Rev

Rev 1251 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1251 Rev 1277
Line 20... Line 20...
20 
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
20 
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
21 
 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
21 
 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
22 
 * DEALINGS IN THE SOFTWARE.
22 
 * DEALINGS IN THE SOFTWARE.
23 
 */
 23 
 */
24 
 
 24 
 
25 
#include <stdlib.h>
 - 
 
26 
 
 - 
 
27 
#include "svarlang.h"
 25 
#include "svarlang.h"
28 
 
 26 
 
29 
int svarlang_autoload(const char *progname) {
 27 
int svarlang_autoload(const char *progname) {
30 
  const char *s;
 - 
 
31 
  char langid[3];
 - 
 
32 
  s = getenv("LANG");
 - 
 
33 
  if ((s == NULL) || (*s == 0)) return(-1);
 28 
  if (svarlang_autoload_nlspath(progname) == 0) return(0);
34 
  langid[0] = s[0];
 - 
 
35 
  langid[1] = s[1];
 - 
 
36 
  langid[2] = 0;
 29 
  return(-1);
37 
  return(svarlang_load(progname, langid, getenv("NLSPATH")));
 - 
 
38 
}
 30 
}