[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/value_builder usmarc_field_952v.pl [rel_2_2]
From: |
Joshua Ferraro |
Subject: |
[Koha-cvs] koha/value_builder usmarc_field_952v.pl [rel_2_2] |
Date: |
Wed, 20 Sep 2006 02:59:53 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch: rel_2_2
Changes by: Joshua Ferraro <kados> 06/09/20 02:59:53
Modified files:
value_builder : usmarc_field_952v.pl
Log message:
zero-pad the month and day.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/value_builder/usmarc_field_952v.pl?cvsroot=koha&only_with_tag=rel_2_2&r1=1.1.2.1&r2=1.1.2.2
Patches:
Index: usmarc_field_952v.pl
===================================================================
RCS file: /sources/koha/koha/value_builder/usmarc_field_952v.pl,v
retrieving revision 1.1.2.1
retrieving revision 1.1.2.2
diff -u -b -r1.1.2.1 -r1.1.2.2
--- usmarc_field_952v.pl 9 Dec 2005 16:53:45 -0000 1.1.2.1
+++ usmarc_field_952v.pl 20 Sep 2006 02:59:53 -0000 1.1.2.2
@@ -1,6 +1,6 @@
#!/usr/bin/perl
-# $Id: usmarc_field_952v.pl,v 1.1.2.1 2005/12/09 16:53:45 kados Exp $
+# $Id: usmarc_field_952v.pl,v 1.1.2.2 2006/09/20 02:59:53 kados Exp $
# Copyright 2000-2002 Katipo Communications
#
@@ -64,7 +64,10 @@
localtime(time);
$year +=1900;
$mon +=1;
-my $date = "$year-$mon-$mday";
+$pmon = sprintf("%0*d", "2",$mon);
+
+$pmday = sprintf("%0*d", "2",$mday);
+my $date = "$year-$pmon-$pmday";
my $res = "
<script>
function Blur$function_name(index) {
@@ -74,9 +77,11 @@
function Focus$function_name(subfield_managed) {
for (i=0 ; i<document.f.field_value.length ; i++) {
if (document.f.tag[i].value == '952' &&
document.f.subfield[i].value == 'v') {
+ if
(document.f.field_value[i].value == '') {
document.f.field_value[i].value = '$date';
}
}
+ }
return 0;
}
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] koha/value_builder usmarc_field_952v.pl [rel_2_2],
Joshua Ferraro <=