From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Sun, 24 Nov 2013 16:51:07 +0000 (+0100)
Subject: fix author extraction fir just Filozofski fakultet u Zagrebu
X-Git-Url: http://git.rot13.org/?p=koha-bibliografija;a=commitdiff_plain;h=9e52f8eb286e7e85d39c1d26117a2b9dda2fbf1d;hp=40bdab91d68f2b62216c836c77078325c36e4e49

fix author extraction fir just Filozofski fakultet u Zagrebu
---

diff --git a/html.pl b/html.pl
index a638c23..0c55a7a 100755
--- a/html.pl
+++ b/html.pl
@@ -42,11 +42,15 @@ from auth_header
 
 $sth_auth->execute();
 while( my $row = $sth_auth->fetchrow_hashref ) {
+	if ( $row->{department} !~ m/Filozofski fakultet u Zagrebu/ ) {
+		push @{ $skip->{nije_ffzg} }, $row;
+		next;
+	}
 	$auth_header->{ $row->{authid} } = $row->{full_name};
-	$row->{department} =~ s/, Filozofski fakultet u Zagrebu\s*// || next;
+	$row->{department} =~ s/, Filozofski fakultet u Zagrebu.*$//;
 	$row->{department} =~ s/^.+\.\s*//;
-	push @{ $auth_department->{ $row->{department} } }, $row->{authid};
 #	warn dump( $row );
+	push @{ $auth_department->{ $row->{department} } }, $row->{authid};
 	push @authors, $row;
 
 }