Mercurial > emacs
comparison src/xterm.c @ 24164:1f8d4cb55bd6
(same_x_server): Detect treat ":0" and "unix:0"
as the same. Treat "myname:0" as the same as those two.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 24 Jan 1999 20:07:05 +0000 |
parents | 1deaaafdf9ea |
children | c7888c86b9e1 |
comparison
equal
deleted
inserted
replaced
24163:719325fbe6a1 | 24164:1f8d4cb55bd6 |
---|---|
6949 static int | 6949 static int |
6950 same_x_server (name1, name2) | 6950 same_x_server (name1, name2) |
6951 char *name1, *name2; | 6951 char *name1, *name2; |
6952 { | 6952 { |
6953 int seen_colon = 0; | 6953 int seen_colon = 0; |
6954 unsigned char *system_name = XSTRING (Vsystem_name)->data; | |
6955 int system_name_length = strlen (system_name); | |
6956 int length_until_period = 0; | |
6957 | |
6958 while (system_name[length_until_period] != 0 | |
6959 && system_name[length_until_period] != '.') | |
6960 length_until_period++; | |
6961 | |
6962 /* Treat `unix' like an empty host name. */ | |
6963 if (! strncmp (name1, "unix:", 5)) | |
6964 name1 += 4; | |
6965 if (! strncmp (name2, "unix:", 5)) | |
6966 name2 += 4; | |
6967 /* Treat this host's name like an empty host name. */ | |
6968 if (! strncmp (name1, system_name, system_name_length) | |
6969 && name1[system_name_length] == ':') | |
6970 name1 += system_name_length; | |
6971 if (! strncmp (name2, system_name, system_name_length) | |
6972 && name2[system_name_length] == ':') | |
6973 name2 += system_name_length; | |
6974 /* Treat this host's domainless name like an empty host name. */ | |
6975 if (! strncmp (name1, system_name, length_until_period) | |
6976 && name1[length_until_period] == ':') | |
6977 name1 += length_until_period; | |
6978 if (! strncmp (name2, system_name, length_until_period) | |
6979 && name2[length_until_period] == ':') | |
6980 name2 += length_until_period; | |
6981 | |
6954 for (; *name1 != '\0' && *name1 == *name2; name1++, name2++) | 6982 for (; *name1 != '\0' && *name1 == *name2; name1++, name2++) |
6955 { | 6983 { |
6956 if (*name1 == ':') | 6984 if (*name1 == ':') |
6957 seen_colon++; | 6985 seen_colon++; |
6958 if (seen_colon && *name1 == '.') | 6986 if (seen_colon && *name1 == '.') |