[Koha-cvs] koha cataloguing/value_builder/unimarc_field_10... [rel_3_0]

[paul poulain]

CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_3_0
Changes by:	paul poulain <tipaul>	06/11/06 08:45:48

Modified files:
	cataloguing/value_builder: unimarc_field_100.pl 
	                           unimarc_leader.pl 
	koha-tmpl/intranet-tmpl/prog/en/cataloguing/value_builder: 
	                                                           unimarc_leader.tmpl 

Log message:
	some fixes for unimarc plugins

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/cataloguing/value_builder/unimarc_field_100.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.1.2.2&r2=1.1.2.3
http://cvs.savannah.gnu.org/viewcvs/koha/cataloguing/value_builder/unimarc_leader.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.1.2.3&r2=1.1.2.4
http://cvs.savannah.gnu.org/viewcvs/koha/koha-tmpl/intranet-tmpl/prog/en/cataloguing/value_builder/unimarc_leader.tmpl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.1.2.1&r2=1.1.2.2

Patches:
Index: cataloguing/value_builder/unimarc_field_100.pl
===================================================================
RCS file: /sources/koha/koha/cataloguing/value_builder/Attic/unimarc_field_100.pl,v
retrieving revision 1.1.2.2
retrieving revision 1.1.2.3
diff -u -b -r1.1.2.2 -r1.1.2.3
--- cataloguing/value_builder/unimarc_field_100.pl	18 Sep 2006 09:48:38 -0000	1.1.2.2
+++ cataloguing/value_builder/unimarc_field_100.pl	6 Nov 2006 08:45:48 -0000	1.1.2.3
@@ -1,7 +1,7 @@
 
 #!/usr/bin/perl
 
-# $Id: unimarc_field_100.pl,v 1.1.2.2 2006/09/18 09:48:38 toins Exp $
+# $Id: unimarc_field_100.pl,v 1.1.2.3 2006/11/06 08:45:48 tipaul Exp $
 
 # Copyright 2000-2002 Katipo Communications
 #
@@ -52,7 +52,7 @@
 }
 
 function Clic$function_name(i) {
-	defaultvalue=document.forms[0].field_value[i].value;
+	defaultvalue=document.forms['f'].field_value[i].value;
 	newin=window.open(\"plugin_launcher.pl?plugin_name=unimarc_field_100.pl&index=\"+i+\"&result=\"+defaultvalue,\"unimarc field 100\",'width=1000,height=600,toolbar=false,scrollbars=yes');
 
 }

Index: cataloguing/value_builder/unimarc_leader.pl
===================================================================
RCS file: /sources/koha/koha/cataloguing/value_builder/Attic/unimarc_leader.pl,v
retrieving revision 1.1.2.3
retrieving revision 1.1.2.4
diff -u -b -r1.1.2.3 -r1.1.2.4
--- cataloguing/value_builder/unimarc_leader.pl	10 Oct 2006 16:34:31 -0000	1.1.2.3
+++ cataloguing/value_builder/unimarc_leader.pl	6 Nov 2006 08:45:48 -0000	1.1.2.4
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-# $Id: unimarc_leader.pl,v 1.1.2.3 2006/10/10 16:34:31 tipaul Exp $
+# $Id: unimarc_leader.pl,v 1.1.2.4 2006/11/06 08:45:48 tipaul Exp $
 
 # Copyright 2000-2002 Katipo Communications
 #
@@ -72,7 +72,7 @@
 	my $dbh = C4::Context->dbh;
 
 my ($template, $loggedinuser, $cookie)
-    = get_template_and_user({template_name => "value_builder/unimarc_leader.tmpl",
+    = get_template_and_user({template_name => "cataloguing/value_builder/unimarc_leader.tmpl",
 			     query => $input,
 			     type => "intranet",
 			     authnotrequired => 0,

Index: koha-tmpl/intranet-tmpl/prog/en/cataloguing/value_builder/unimarc_leader.tmpl
===================================================================
RCS file: /sources/koha/koha/koha-tmpl/intranet-tmpl/prog/en/cataloguing/value_builder/Attic/unimarc_leader.tmpl,v
retrieving revision 1.1.2.1
retrieving revision 1.1.2.2
diff -u -b -r1.1.2.1 -r1.1.2.2
--- koha-tmpl/intranet-tmpl/prog/en/cataloguing/value_builder/unimarc_leader.tmpl	6 Nov 2006 08:20:48 -0000	1.1.2.1
+++ koha-tmpl/intranet-tmpl/prog/en/cataloguing/value_builder/unimarc_leader.tmpl	6 Nov 2006 08:45:48 -0000	1.1.2.2
@@ -231,7 +231,7 @@
 		opener.document.f.field_value[<!-- TMPL_VAR name="index" -->].value = 
 			'     '+document.f_pop.f5.value +
 			document.f_pop.f6.value+ document.f_pop.f7.value+
-			document.f_pop.f8.value+ document.f_pop.f9.value+ '       '+
+			document.f_pop.f8.value+ '        '+
 			document.f_pop.f17.value+ document.f_pop.f18.value+' 450  ';
 		self.close();
 		return false;