--- deliantra/server/utils/cfutil.in	2010/10/05 23:52:02	1.90
+++ deliantra/server/utils/cfutil.in	2010/10/05 23:52:52	1.91
@@ -845,14 +845,15 @@
             #length $v->{data32} <= 10000 or warn "$k: face32 larger than 10000 bytes, will not work with crossfire client.\n";
             #length $v->{data64} <= 10000 or warn "$k: face64 larger than 10000 bytes.\n";
 
-            my $stem = delete $v->{stem};
-            $v->{glyph} //= autoglyph $stem, $v;
-
             if (my $magicmap = $v->{magicmap}) {
                $magicmap =~ y/A-Z_\-/a-z/d;
                $v->{magicmap} = $COLOR{$magicmap};
             }
 
+            my $stem = delete $v->{stem};
+            $v->{glyph} //= autoglyph $stem, $v;
+            $v->{glyph} = (chr $v->{magicmap}) . $v->{glyph};
+
             delete $v->{arc};
          }