added/updated some .cvsignores

[supertux.git] / lib / lisp / writer.cpp

diff --git a/lib/lisp/writer.cpp b/lib/lisp/writer.cpp
index a8c5c24..e4a810a 100644 (file)
--- a/lib/lisp/writer.cpp
+++ b/lib/lisp/writer.cpp
@@ -89,10 +89,16 @@ Writer::write_float(const std::string& name, float value)
 }
 
 void
-Writer::write_string(const std::string& name, const std::string& value)
+Writer::write_string(const std::string& name, const std::string& value,
+    bool translatable)
 {
   indent();
-  out << '(' << name << " \"" << value << "\")\n";
+  out << '(' << name;
+  if(translatable) {
+    out << " (_ \"" << value << "\"))\n";
+  } else {
+    out << " \"" << value << "\")\n";
+  }
 }
 
 void