--- deliantra/server/include/cfperl.h	2006/09/04 11:07:59	1.22
+++ deliantra/server/include/cfperl.h	2006/09/04 13:55:54	1.23
@@ -220,7 +220,7 @@
     add ('\n');
   }
 
-  void put (keyword kbeg, keyword kend, const char *v)
+  void put (keyword kbeg, keyword kend, const shstr &v)
   {
     add (keyword_str [kbeg], keyword_len [kbeg]); add ('\n');
 
@@ -248,7 +248,10 @@
   template<typename T>
   void put (keyword k, T *v)
   {
-    put (k, v ? (const char *)v->name : 0);
+    if (v)
+      put (k, v->name);
+    else
+      put (k, (const char *)0);
   }
 
   bool save (const char *filename);