[Koha-cvs] koha/members memberentry.pl [rel_3_0]

[Antoine Farnault]

CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_3_0
Changes by:	Antoine Farnault <toins>	06/10/17 16:34:09

Modified files:
	members        : memberentry.pl 

Log message:
	Bug fix : bad param when calling GetborCatFromCatType. Categories are now correctly display when adding an organisation.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/members/memberentry.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.38.2.7&r2=1.38.2.8

Patches:
Index: memberentry.pl
===================================================================
RCS file: /sources/koha/koha/members/memberentry.pl,v
retrieving revision 1.38.2.7
retrieving revision 1.38.2.8
diff -u -b -r1.38.2.7 -r1.38.2.8
--- memberentry.pl	13 Oct 2006 11:21:54 -0000	1.38.2.7
+++ memberentry.pl	17 Oct 2006 16:34:08 -0000	1.38.2.8
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: memberentry.pl,v 1.38.2.7 2006/10/13 11:21:54 btoumi Exp $
+# $Id: memberentry.pl,v 1.38.2.8 2006/10/17 16:34:08 toins Exp $
 
 # Copyright 2006 SAN OUEST PROVENCE et Paul POULAIN
 #
@@ -157,7 +157,6 @@
                         $nok = 1;
                     }
                 }
-	
 	}
 
 # STEP 2
@@ -265,6 +264,7 @@
 		$template->param(female => 1);
 	}
 	my ($categories,$labels)=ethnicitycategories();
+    
 	my $ethnicitycategoriescount=$#{$categories};
 	my $ethcatpopup;
 	if ($ethnicitycategoriescount>=0) {
@@ -278,8 +278,9 @@
 	}
 	
 	
-	my $action="WHERE category_type=?";
-	($categories,$labels)=GetborCatFromCatType($category_type,$action);
+	#my $action="WHERE category_type=?";
+	my $action ="";
+	my ($categories,$labels)=GetborCatFromCatType($category_type,$action);
 	
 	#if u modify the borrowers u must have the right value for is category code