1 files changed, 14 insertions, 0 deletions
diff --git a/debian/klist-to-po.pl b/debian/klist-to-po.pl
new file mode 100755
index 0000000..9bf2953
--- /dev/null
+++ b/debian/klist-to-po.pl
@@ -0,0 +1,14 @@
+#!/usr/bin/perl
+
+
+$filename = $ARGV[0];
+open (MAPLIST, $filename) || die "Failed to open $filename";
+
+while (<MAPLIST>) {
+	($langlist, $name, $english) = split;
+	print "# $filename, $name\n";
+	print "msgid \"$english\"\n";
+	print "msgstr \"\"\n\n";
+}
+
+close MAPLIST;