projects
/
koha-bibliografija
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
683a127
)
poslano 2014-01-27
author
Marijana Glavica
<mglavica@ffzg.hr>
Tue, 28 Jan 2014 09:36:40 +0000
(10:36 +0100)
committer
Marijana Glavica
<mglavica@ffzg.hr>
Tue, 28 Jan 2014 09:36:40 +0000
(10:36 +0100)
html.pl
patch
|
blob
|
history
diff --git
a/html.pl
b/html.pl
index
92b12a0
..
1d5ef4c
100755
(executable)
--- a/
html.pl
+++ b/
html.pl
@@
-28,14
+28,14
@@
sub debug {
my $xslfilename = 'compact.xsl';
my $azvo_group_title = {
my $xslfilename = 'compact.xsl';
my $azvo_group_title = {
-'znanstveno nastavni' => qr/(profes
or|docent|znanstveni
)/i,
+'znanstveno nastavni' => qr/(profes
|docent|znanstveni savjetnik|znanstveni suradnik
)/i,
'lektori i predavači' => qr/(lektor|predavač)/i,
'asistenti i novaci' => qr/(asistent|novak)/i,
};
my $department_groups = {
'lektori i predavači' => qr/(lektor|predavač)/i,
'asistenti i novaci' => qr/(asistent|novak)/i,
};
my $department_groups = {
-'AA
A
_humanističke' => qr/(anglistiku|arheologiju|antropologiju|filozofiju|fonetiku|germanistiku|hungarologiju|indologiju|slavenske|filologiju|komparativnu|kroatistiku|lingvistiku|povijest|romanistiku|talijanistiku)/i,
-'AA
B
_društvene' => qr/(informacijske|pedagogiju|psihologiju|sociologiju)/i,
+'AA
B
_humanističke' => qr/(anglistiku|arheologiju|antropologiju|filozofiju|fonetiku|germanistiku|hungarologiju|indologiju|slavenske|filologiju|komparativnu|kroatistiku|lingvistiku|povijest|romanistiku|talijanistiku)/i,
+'AA
C
_društvene' => qr/(informacijske|pedagogiju|psihologiju|sociologiju)/i,
};
my $auth_header;
};
my $auth_header;
@@
-432,7
+432,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 @categories, keys %{ $authors->{$authid}->{sec} };
foreach my $category ( sort @categories ) {
push @{ $department_category_author->{$department}->{$category} }, $authid;
- push @{ $department_category_author->{'AA
Z
_ukupno'}->{$category} }, $authid if $department_in_sum->{$department};
+ push @{ $department_category_author->{'AA
A
_ukupno'}->{$category} }, $authid if $department_in_sum->{$department};
if ( my $group = $department_in_group->{ $department } ) {
push @{ $department_category_author->{$group}->{$category} }, $authid;
} else {
if ( my $group = $department_in_group->{ $department } ) {
push @{ $department_category_author->{$group}->{$category} }, $authid;
} else {