30 	char_u	*p;  in get_locale_val()  local
34 	p = vim_strchr(loc, '=');  in get_locale_val()
35 	if (p != NULL)  in get_locale_val()
37 	    loc = ++p;  in get_locale_val()
38 	    while (*p != NUL)	// remove trailing newline  in get_locale_val()
40 		if (*p < ' ' || *p == ';')  in get_locale_val()
42 		    *p = NUL;  in get_locale_val()
45 		++p;  in get_locale_val()
112     char_u *p;  in get_mess_lang()  local
116     p = get_locale_val(LC_MESSAGES);  in get_mess_lang()
122     p = get_locale_val(LC_COLLATE);  in get_mess_lang()
125     p = mch_getenv((char_u *)"LC_ALL");  in get_mess_lang()
126     if (!is_valid_mess_lang(p))  in get_mess_lang()
128 	p = mch_getenv((char_u *)"LC_MESSAGES");  in get_mess_lang()
129 	if (!is_valid_mess_lang(p))  in get_mess_lang()
130 	    p = mch_getenv((char_u *)"LANG");  in get_mess_lang()
134     p = gettext_lang(p);  in get_mess_lang()
136     return is_valid_mess_lang(p) ? p : NULL;  in get_mess_lang()
151     char_u	*p;  in get_mess_env()  local
153     p = mch_getenv((char_u *)"LC_ALL");  in get_mess_env()
154     if (p == NULL || *p == NUL)  in get_mess_env()
156 	p = mch_getenv((char_u *)"LC_MESSAGES");  in get_mess_env()
157 	if (p == NULL || *p == NUL)  in get_mess_env()
159 	    p = mch_getenv((char_u *)"LANG");  in get_mess_env()
160 	    if (p != NULL && VIM_ISDIGIT(*p))  in get_mess_env()
161 		p = NULL;		// ignore something like "1043"  in get_mess_env()
163 	    if (p == NULL || *p == NUL)  in get_mess_env()
164 		p = get_locale_val(LC_CTYPE);  in get_mess_env()
168     return p;  in get_mess_env()
243 	char_u	*p;  in init_locale()  local
251 	p = vim_getenv((char_u *)"VIMRUNTIME", &mustfree);  in init_locale()
252 	if (p != NULL && *p != NUL)  in init_locale()
254 	    vim_snprintf((char *)NameBuff, MAXPATHL, "%s/lang", p);  in init_locale()
258 	    vim_free(p);  in init_locale()
271     char_u	*p;  in ex_language()  local
286     p = skiptowhite(eap->arg);  in ex_language()
287     if ((*p == NUL || VIM_ISWHITE(*p)) && p - eap->arg >= 3)  in ex_language()
289 	if (STRNICMP(eap->arg, "messages", p - eap->arg) == 0)  in ex_language()
292 	    name = skipwhite(p);  in ex_language()
295 	else if (STRNICMP(eap->arg, "ctype", p - eap->arg) == 0)  in ex_language()
298 	    name = skipwhite(p);  in ex_language()
301 	else if (STRNICMP(eap->arg, "time", p - eap->arg) == 0)  in ex_language()
304 	    name = skipwhite(p);  in ex_language()
307 	else if (STRNICMP(eap->arg, "collate", p - eap->arg) == 0)  in ex_language()
310 	    name = skipwhite(p);  in ex_language()
319 	    p = get_mess_env();  in ex_language()
322 	    p = (char_u *)setlocale(what, NULL);  in ex_language()
323 	if (p == NULL || *p == NUL)  in ex_language()
324 	    p = (char_u *)"Unknown";  in ex_language()
325 	smsg(_("Current %slanguage: \"%s\""), whatstr, p);  in ex_language()
429 	char_u		*p;  in find_locales()  local
441 	p = locale_list;  in find_locales()
443 	while (p != NULL && *p != NUL)  in find_locales()
445 	    if (*p == '\n')  in find_locales()
447 	    if (*p == '\\')  in find_locales()
448 		len = p - locale_list;  in find_locales()
449 	    p++;  in find_locales()