From ff73d71bb849ceab4994d182dd80a324144d7678 Mon Sep 17 00:00:00 2001
From: Hans-Christoph Steiner <eighthave@users.sourceforge.net>
Date: Sun, 17 Aug 2003 23:57:33 +0000
Subject: moved to root level so that there is one common version for all
 objects

svn path=/trunk/externals/unauthorized/; revision=874
---
 tk2c.bash | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100755 tk2c.bash

(limited to 'tk2c.bash')

diff --git a/tk2c.bash b/tk2c.bash
new file mode 100755
index 0000000..9dfeb03
--- /dev/null
+++ b/tk2c.bash
@@ -0,0 +1,24 @@
+#!/bin/bash
+
+#set -x
+
+while read line
+do
+  for word in $line
+  do
+    if [ "X"$word != "X"${word#\#} ]
+    then
+       echo // ${line#\#}
+       break
+    else
+       line=${line//\'/\\\'}
+#useless, slashes never gets in
+       line=${line//\\/\\\\}
+#this one's dirty, i know
+       line=${line//;/\\\\;}
+       line=${line//\"/\\\"}
+       echo 'sys_gui("'$line'\n");'
+       break
+    fi
+  done
+done
-- 
cgit v1.2.1