projects
/
rocksndiamonds.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fixed bug with rotating elements twice in editor with pressed Shift key
[rocksndiamonds.git]
/
build-scripts
/
create_element_defs.pl
diff --git
a/build-scripts/create_element_defs.pl
b/build-scripts/create_element_defs.pl
index 84d9bc6c6ad14289d5d5476eb1a66b048e2f5a76..b75d86ac79c6752c99a3068df90604f530f9a6c4 100755
(executable)
--- a/
build-scripts/create_element_defs.pl
+++ b/
build-scripts/create_element_defs.pl
@@
-500,6
+500,11
@@
sub print_sounds_list
$sound =~ s/^/CLASS_/; # add class identifier
}
$sound =~ s/^/CLASS_/; # add class identifier
}
+ # dirty hack for making "ABC[DEF]" work as a "special" suffix
+ $sound =~ s/([^_])\[/$1_/;
+ $sound =~ s/\[//;
+ $sound =~ s/\]//;
+
$sound = "SND_$sound";
my $define_text = "#define $sound";
$sound = "SND_$sound";
my $define_text = "#define $sound";
@@
-558,6
+563,11
@@
sub print_music_list
my $music = $_;
my $music = $_;
+ # dirty hack for making "ABC[DEF]" work as a "special" suffix
+ $music =~ s/([^_])\[/$1_/;
+ $music =~ s/\[//;
+ $music =~ s/\]//;
+
$music = "MUS_$music";
my $define_text = "#define $music";
$music = "MUS_$music";
my $define_text = "#define $music";