sanop specific : sorting itemtype

should not be ported to head, as it's a dirty unimarc hack, that will disappear with itemtype at item level

diff --git a/acqui/addorderiso2709.pl b/acqui/addorderiso2709.pl
index 51df588..6329307 100755 (executable)
--- a/acqui/addorderiso2709.pl
+++ b/acqui/addorderiso2709.pl
@@ -266,7 +266,7 @@ sub import_biblios_list {
 # Itemtype is mandatory for adding a biblioitem, we just add a default, the user needs to modify this aftewards
     my $itemtypehash = GetItemTypes();
     my @itemtypes;
-    for my $key (keys %$itemtypehash) {
+    for my $key (sort { $itemtypehash->{$a}->{description} cmp $itemtypehash->{$b}->{description} } keys %$itemtypehash) {
         push(@itemtypes, $itemtypehash->{$key});
     }
     foreach my $biblio (@$biblios) {