aniani/irssi
1
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2024-10-27 05:20:20 -04:00
Code

small fix.

Browse Source 
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@444 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Timo Sirainen 2000-07-09 14:05:13 +00:00 committed by cras
parent 08d500519f
commit 5557bf3f75
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
.cvsignore
View File

@ -32,3 +32,4 @@ default-config.h
irssi-version.h
irssi-version.h.in
irssi-config
colorless.theme

3
autogen.sh
View File

@ -142,8 +142,7 @@ for i in $files; do
file=`echo "$i"|sed 's@^src/@@'`
file=`echo "$file"|sed 's@/module-formats\.c$@@'`
echo " \"$file\" = {" >> colorless.theme
#cat $i | perl -e 'while (<>) { if (/.*".*".*".*"/) { s/^\W*{\W*"([^"]*)",\W*"([^"]*)".*/ \1 = "\2;"/; print $_; } }' >> colorless.theme
cat $i | perl -e 'while (<>) { if (/^\W*{\W*"([^"]*)",\W*"([^"]*)".*/) { $key = $1; $value = $2; $value ~= s/%[krgybmpcwKRGYBMPCW01234567]//g; print(" $key = \"$value\";\n"); } }' >> colorless.theme
cat $i | perl -e 'while (<>) { if (/^\W*{\W*"([^"]*)",\W*"([^"]*)".*/) { $key = $1; $value = $2; $value =~ s/%[krgybmpcwKRGYBMPCW01234567]//g; print(" $key = \"$value\";\n"); } }' >> colorless.theme
echo " };" >> colorless.theme
done