#!/usr/local/bin/perl

while (<>) {
    last if /static char/;
}
$_=<>; s/,$//;
print "		    SF-MENUICON   _\"MenuIcon\"\n";
print "		    '($_";
while (<>) {
    s/,$//;
    s/};$/)/;
    s/^/		      /;
    print;
}
