koha-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Koha-cvs] koha/acqui.simple addbiblio.pl [rel_2_2]


From: Joshua Ferraro
Subject: [Koha-cvs] koha/acqui.simple addbiblio.pl [rel_2_2]
Date: Fri, 17 Mar 2006 10:50:21 +0000

CVSROOT:        /sources/koha
Module name:    koha
Branch:         rel_2_2
Changes by:     Joshua Ferraro <address@hidden> 06/03/17 10:50:19

Modified files:
        acqui.simple   : addbiblio.pl 

Log message:
        Heavy revisions to MARC Editor ... I'll send a mail to koha-devel asap.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/acqui.simple/addbiblio.pl.diff?only_with_tag=rel_2_2&tr1=1.52.2.31&tr2=1.52.2.32&r1=text&r2=text

Patches:
Index: koha/acqui.simple/addbiblio.pl
diff -u koha/acqui.simple/addbiblio.pl:1.52.2.31 
koha/acqui.simple/addbiblio.pl:1.52.2.32
--- koha/acqui.simple/addbiblio.pl:1.52.2.31    Thu Mar 16 17:54:37 2006
+++ koha/acqui.simple/addbiblio.pl      Fri Mar 17 10:50:17 2006
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-# $Id: addbiblio.pl,v 1.52.2.31 2006/03/16 17:54:37 kados Exp $
+# $Id: addbiblio.pl,v 1.52.2.32 2006/03/17 10:50:17 kados Exp $
 
 # Copyright 2000-2002 Katipo Communications
 #
@@ -185,7 +185,7 @@
                $subfield_data{marc_value}= build_authorized_values_list($tag, 
$subfield, $value, $dbh,$authorised_values_sth);
        # it's a thesaurus / authority field
        } elsif ($tagslib->{$tag}->{$subfield}->{authtypecode}) {
-               $subfield_data{marc_value}="<input type=\"text\" 
name=\"field_value\" value=\"$value\" size=\"70\" maxlength=\"255\" DISABLE 
READONLY> <a 
href=\"javascript:Dopop('../authorities/auth_finder.pl?authtypecode=".$tagslib->{$tag}->{$subfield}->{authtypecode}."&index=$i',$i)\">...</a>";
+               $subfield_data{marc_value}="<input 
onblur=\"this.style.backgroundColor='#ffffff';\" 
onfocus=\"this.style.backgroundColor='#ffff00;'\"\" tabindex=\"1\" 
type=\"text\" name=\"field_value\" value=\"$value\" size=\"70\" 
maxlength=\"255\" DISABLE READONLY> <a  style=\"cursor: help;\" 
href=\"javascript:Dopop('../authorities/auth_finder.pl?authtypecode=".$tagslib->{$tag}->{$subfield}->{authtypecode}."&index=$i',$i)\">...</a>";
        # it's a plugin field
        } elsif ($tagslib->{$tag}->{$subfield}->{'value_builder'}) {
                # opening plugin. Just check wether we are on a developper 
computer on a production one
@@ -198,18 +198,18 @@
                require $plugin;
                my $extended_param = 
plugin_parameters($dbh,$rec,$tagslib,$i,$tabloop);
                my ($function_name,$javascript) = 
plugin_javascript($dbh,$rec,$tagslib,$i,$tabloop);
-               $subfield_data{marc_value}="<input type=\"text\" 
name=\"field_value\"  value=\"$value\" size=\"70\" maxlength=\"255\" 
OnFocus=\"javascript:Focus$function_name($i)\" 
OnBlur=\"javascript:Blur$function_name($i)\"> <a 
href=\"javascript:Clic$function_name($i)\">...</a> $javascript";
+               $subfield_data{marc_value}="<input tabindex=\"1\" type=\"text\" 
name=\"field_value\"  value=\"$value\" size=\"70\" maxlength=\"255\" 
OnFocus=\"javascript:Focus$function_name($i)\" 
OnBlur=\"javascript:Blur$function_name($i); \"> <a  style=\"cursor: help;\" 
href=\"javascript:Clic$function_name($i)\">...</a> $javascript";
        # it's an hidden field
        } elsif  ($tag eq '') {
-               $subfield_data{marc_value}="<input type=\"hidden\" 
name=\"field_value\" value=\"$value\">";
+               $subfield_data{marc_value}="<input 
onblur=\"this.style.backgroundColor='#ffffff';\" 
onfocus=\"this.style.backgroundColor='#ffff00'; \" tabindex=\"1\" 
type=\"hidden\" name=\"field_value\" value=\"$value\">";
        } elsif  ($tagslib->{$tag}->{$subfield}->{'hidden'}) {
-               $subfield_data{marc_value}="<input type=\"text\" 
name=\"field_value\" value=\"$value\" size=\"70\" maxlength=\"255\" >";
+               $subfield_data{marc_value}="<input 
onblur=\"this.style.backgroundColor='#ffffff';\" 
onfocus=\"this.style.backgroundColor='#ffff00'; \" tabindex=\"1\" type=\"text\" 
name=\"field_value\" value=\"$value\" size=\"70\" maxlength=\"255\" >";
        # it's a standard field
        } else {
                if (length($value) >100) {
-                       $subfield_data{marc_value}="<textarea 
name=\"field_value\" cols=\"40\" rows=\"5\" >$value</textarea>";
+                       $subfield_data{marc_value}="<textarea tabindex=\"1\" 
name=\"field_value\" cols=\"40\" rows=\"5\" >$value</textarea>";
                } else {
-                       $subfield_data{marc_value}="<input type=\"text\" 
name=\"field_value\" value=\"$value\" size=\"70\">"; #"
+                       $subfield_data{marc_value}="<input 
onblur=\"this.style.backgroundColor='#ffffff';\" 
onfocus=\"this.style.backgroundColor='#ffff00'; \" tabindex=\"1\" type=\"text\" 
name=\"field_value\" value=\"$value\" size=\"70\">"; #"
                }
        }
        return \%subfield_data;
@@ -285,6 +285,10 @@
                                                $tag_data{repeatable} = 
$tagslib->{$tag}->{repeatable};
                                                $tag_data{indicator} = 
$record->field($tag)->indicator(1). $record->field($tag)->indicator(2) if 
($tag>=10);
                                                $tag_data{subfield_loop} = 
address@hidden;
+                                               if ($tag<10) {
+                                                       $tag_data{fixedfield} = 
1;
+                                               }
+
                                                push (@loop_data, \%tag_data);
                                        }
 # If there is more than 1 field, add an empty hidden field as separator.
@@ -296,6 +300,10 @@
                                                $tag_data{tag_lib} = '';
                                                $tag_data{indicator} = '';
                                                $tag_data{subfield_loop} = 
address@hidden;
+                                               if ($tag<10) {
+                                                               
$tag_data{fixedfield} = 1;
+                                               }
+
                                                push (@loop_data, \%tag_data);
                                                $i++;
                                        }
@@ -320,6 +328,9 @@
                                        $tag_data{indicator} = $indicator;
                                        $tag_data{subfield_loop} = 
address@hidden;
                                        $tag_data{tagfirstsubfield} = 
$tag_data{subfield_loop}[0];
+                                       if ($tag<10) {
+                                               $tag_data{fixedfield} = 1;
+                                       }
                                        push (@loop_data, \%tag_data);
                                }
                        }
@@ -549,5 +560,6 @@
                intranetcolorstylesheet => 
C4::Context->preference("intranetcolorstylesheet"),
                intranetstylesheet => 
C4::Context->preference("intranetstylesheet"),
                IntranetNav => C4::Context->preference("IntranetNav"),
+               advancedMARCEditor => 
C4::Context->preference("advancedMARCEditor"),
                );
 output_html_with_http_headers $input, $cookie, $template->output;




reply via email to

[Prev in Thread] Current Thread [Next in Thread]