diff options
author | N.N. <sevyves@users.sourceforge.net> | 2004-03-30 04:25:10 +0000 |
---|---|---|
committer | N.N. <sevyves@users.sourceforge.net> | 2004-03-30 04:25:10 +0000 |
commit | d8e4c552f0e58ddb76dc3991c37ce13557eb8a2e (patch) | |
tree | 7b278893e75b82ba4980227baf4d2b5499a650bd /cooled~/tk2c.bash | |
parent | d3ee59e709bbc51fea444584fed70c7fb084fd45 (diff) |
cooled~ 0.12
svn path=/trunk/externals/unauthorized/; revision=1516
Diffstat (limited to 'cooled~/tk2c.bash')
-rwxr-xr-x | cooled~/tk2c.bash | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/cooled~/tk2c.bash b/cooled~/tk2c.bash new file mode 100755 index 0000000..9dfeb03 --- /dev/null +++ b/cooled~/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 |