From 614429415aeadc2d81dac9259b78db4f9f1c19ed Mon Sep 17 00:00:00 2001 From: Marijana Glavica Date: Tue, 24 Dec 2013 05:24:12 +0100 Subject: [PATCH] sort totals as first column --- html.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/html.pl b/html.pl index 7e7b81a..525e774 100755 --- a/html.pl +++ b/html.pl @@ -34,8 +34,8 @@ my $azvo_group_title = { }; my $department_groups = { -'ZZA_humanističke' => qr/(anglistiku|arheologiju|antropologiju|filozofiju|fonetiku|germanistiku|hungarologiju|indologiju|slavenske|filologiju|komparativnu|kroatistiku|lingvistiku|povijest|romanistiku|talijanistiku)/i, -'ZZB_društvene' => qr/(informacijske|pedagogiju|psihologiju|sociologiju)/i, +'AAA_humanističke' => qr/(anglistiku|arheologiju|antropologiju|filozofiju|fonetiku|germanistiku|hungarologiju|indologiju|slavenske|filologiju|komparativnu|kroatistiku|lingvistiku|povijest|romanistiku|talijanistiku)/i, +'AAB_društvene' => qr/(informacijske|pedagogiju|psihologiju|sociologiju)/i, }; my $auth_header; @@ -404,7 +404,7 @@ foreach my $department ( sort keys %$auth_department ) { push @categories, keys %{ $authors->{$authid}->{sec} }; foreach my $category ( sort @categories ) { push @{ $department_category_author->{$department}->{$category} }, $authid; - push @{ $department_category_author->{'ZZZ_ukupno'}->{$category} }, $authid if $department_in_sum->{$department}; + push @{ $department_category_author->{'AAZ_ukupno'}->{$category} }, $authid if $department_in_sum->{$department}; if ( my $group = $department_in_group->{ $department } ) { push @{ $department_category_author->{$group}->{$category} }, $authid; } else { -- 2.20.1