Index: autopilot.tcl
===================================================================
--- autopilot.tcl       (revision 1)
+++ autopilot.tcl       (working copy)
@@ -257,9 +257,7 @@
                      # Somebody joined, left or was renamed
                      if {[string first "has joined the game" $linestr] > 0} {
                         # Joined the game.  Greet, announce and increment count.
-                        say_game [string map "NAME {[lrange $line 1 end-4]}" [map_strings [get_setting autopilot motd1]]]
-                        say_game [string map "NAME {[lrange $line 1 end-4]}" [map_strings [get_setting autopilot motd2]]]
-                        say_game [string map "NAME {[lrange $line 1 end-4]}" [map_strings [get_setting autopilot motd3]]]
+                        say_game "[string map \"NAME {[lrange $line 1 end-4]}\" [map_strings [get_setting autopilot motd1]]]\r[string map \"NAME {[lrange $line 1 end-4]}\" [map_strings [get_setting autopilot motd2]]]\r[string map \"NAME {[lrange $line 1 end-4]}\" [map_strings [get_setting autopilot motd3]]]"
                         say_from_game [join [lrange $line 1 end]]
                         incr ::players
                         # Unpause if there are enough players.