X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=token.c;h=01c0c4c5d49f6f6bed4839553ff9e9d5537a2f41;hp=4ec487204ea74a6eec2ea0b8a4553e82b4458aaf;hb=51cff2ac6cb3d097f62b68c51d74fafbce8923f6;hpb=26019087571ebcafae571c7d32f485ceb8af8c5d

diff --git a/token.c b/token.c
index 4ec4872..01c0c4c 100644
--- a/token.c
+++ b/token.c
@@ -1303,15 +1303,18 @@ dostring:
 
 					if (obj_format == ALCYON)
 					{
-						if ((*(ln + 1) == 'w') || (*(ln + 1) == 'W'))
+						if (*ln == '.')
 						{
-							*tk++ = DOTW;
-							ln += 2;
-						}
-						else if ((*(ln + 1) == 'l') || (*(ln + 1) == 'L'))
-						{
-							*tk++ = DOTL;
-							ln += 2;
+							if ((*(ln + 1) == 'w') || (*(ln + 1) == 'W'))
+							{
+								*tk++ = DOTW;
+								ln += 2;
+							}
+							else if ((*(ln + 1) == 'l') || (*(ln + 1) == 'L'))
+							{
+								*tk++ = DOTL;
+								ln += 2;
+							}
 						}
 					}
 				}