[Koha-cvs] koha/C4 Context.pm

[Tumer Garip]

CVSROOT:        /sources/koha
Module name:    koha
Branch:         
Changes by:     Tumer Garip <address@hidden>    06/05/20 14:36:09

Modified files:
        C4             : Context.pm 

Log message:
        Typo error. Missing '>'

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/C4/Context.pm.diff?tr1=1.40&tr2=1.41&r1=text&r2=text

Patches:
Index: koha/C4/Context.pm
diff -u koha/C4/Context.pm:1.40 koha/C4/Context.pm:1.41
--- koha/C4/Context.pm:1.40     Sat May 20 14:28:02 2006
+++ koha/C4/Context.pm  Sat May 20 14:36:09 2006
@@ -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: Context.pm,v 1.40 2006/05/20 14:28:02 tgarip1957 Exp $
+# $Id: Context.pm,v 1.41 2006/05/20 14:36:09 tgarip1957 Exp $
 package C4::Context;
 use strict;
 use DBI;
@@ -25,7 +25,7 @@
        qw($context),
        qw(@context_stack);
 
-$VERSION = do { my @v = '$Revision: 1.40 $' =~ /\d+/g;
+$VERSION = do { my @v = '$Revision: 1.41 $' =~ /\d+/g;
                shift(@v) . "." . join("_", map {sprintf "%03d", $_ } @v); };
 
 =head1 NAME
@@ -438,7 +438,7 @@
 
 retry:
        eval {
-               $Zconn=new 
ZOOM::Connection($context->config("hostname"),$port,databaseName=$context->{"config"}->{$server},
+               $Zconn=new 
ZOOM::Connection($context->config("hostname"),$port,databaseName=>$context->{"config"}->{$server},
                preferredRecordSyntax => "USmarc",elementSetName=> "F");
        };
        if ($@){
@@ -467,7 +467,7 @@
 my ($tcp,$host,$port)=split /:/,$context->{"listen"}->{$server}->{"content"};
 retry:
 eval{
- $Zconnauth=new 
ZOOM::Connection($context->config("hostname"),$port,databaseName=$context->{"config"}->{$server},
+ $Zconnauth=new 
ZOOM::Connection($context->config("hostname"),$port,databaseName=>$context->{"config"}->{$server},
                                                
user=>$context->{"config"}->{"zebrauser"},
                                                
password=>$context->{"config"}->{"zebrapass"},preferredRecordSyntax => 
"USmarc",elementSetName=> "F");
 };
@@ -826,6 +826,9 @@
 
 =cut
 # $Log: Context.pm,v $
+# Revision 1.41  2006/05/20 14:36:09  tgarip1957
+# Typo error. Missing '>'
+#
 # Revision 1.40  2006/05/20 14:28:02  tgarip1957
 # Adding support to read zebra database name from config files
 #