diff options
Diffstat (limited to 'contrib')
| -rw-r--r-- | contrib/aruco/test3.jpg | bin | 2145 -> 0 bytes | |||
| -rw-r--r-- | contrib/aruco/test3.png | bin | 0 -> 53101 bytes | |||
| -rw-r--r-- | contrib/very-important-source-code/make-csv.pl | 2 |
3 files changed, 1 insertions, 1 deletions
diff --git a/contrib/aruco/test3.jpg b/contrib/aruco/test3.jpg Binary files differdeleted file mode 100644 index 2ff6dbd0..00000000 --- a/contrib/aruco/test3.jpg +++ /dev/null diff --git a/contrib/aruco/test3.png b/contrib/aruco/test3.png Binary files differnew file mode 100644 index 00000000..81f2d201 --- /dev/null +++ b/contrib/aruco/test3.png diff --git a/contrib/very-important-source-code/make-csv.pl b/contrib/very-important-source-code/make-csv.pl index ee60364e..fcac9369 100644 --- a/contrib/very-important-source-code/make-csv.pl +++ b/contrib/very-important-source-code/make-csv.pl @@ -58,7 +58,7 @@ sub merge { } } print "No;Game Name;Game protocol;Supported since;Verified;By;INTERNATIONAL_ID;FTN_ID\n"; - for (sort { lc($a->{name}) cmp lc($b->{name}) } values %game_hash) { + for (sort { $a->{name} cmp $b->{name} } values %game_hash) { my $g = {%$_}; if (!defined $g->{key}) { $g->{key} = (sprintf "%04X", $g->{no}) . (join"", map { sprintf "%02X", int rand 256 } 0 .. 7) . '00'; |
