[Koha-cvs] koha/catalogue issuehistory.pl [rel_3_0]

Antoine Farnault antoine at koha-fr.org
Thu Jan 11 16:16:04 CET 2007


CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_3_0
Changes by:	Antoine Farnault <toins>	07/01/11 15:16:04

Modified files:
	catalogue      : issuehistory.pl 

Log message:
	little reindentation.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/catalogue/issuehistory.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.1.2.6&r2=1.1.2.7

Patches:
Index: issuehistory.pl
===================================================================
RCS file: /sources/koha/koha/catalogue/Attic/issuehistory.pl,v
retrieving revision 1.1.2.6
retrieving revision 1.1.2.7
diff -u -b -r1.1.2.6 -r1.1.2.7
--- issuehistory.pl	18 Dec 2006 16:35:17 -0000	1.1.2.6
+++ issuehistory.pl	11 Jan 2007 15:16:04 -0000	1.1.2.7
@@ -15,7 +15,7 @@
 # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
 # Suite 330, Boston, MA  02111-1307 USA
 
-# $Id: issuehistory.pl,v 1.1.2.6 2006/12/18 16:35:17 toins Exp $
+# $Id: issuehistory.pl,v 1.1.2.7 2007/01/11 15:16:04 toins Exp $
 
 use strict;
 require Exporter;
@@ -25,14 +25,16 @@
 
 use C4::Circulation::Circ2; # GetIssuesFromBiblio
 
-my $query=new CGI;
-my ($template, $borrowernumber, $cookie)
-    = get_template_and_user({template_name => "catalogue/issuehistory.tmpl",
+my $query = new CGI;
+my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
+    {
+        template_name   => "catalogue/issuehistory.tmpl",
 			     query => $query,
 			     type => "intranet",
 			     authnotrequired => 0,
-			     flagsrequired => {circulate => 1},
-			     });
+        flagsrequired   => { circulate => 1 },
+    }
+);
 
 # getting cgi params.
 my $params = $query->Vars;
@@ -44,7 +46,7 @@
 my $issues = GetIssuesFromBiblio($biblionumber);
 my $total = scalar @$issues;
 
-if($total && !$title){
+if ( $total && !$title ) {
     $title = $issues->[0]->{'title'};
     $author = $issues->[0]->{'author'};
 }





More information about the Koha-cvs mailing list