[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/acqui.simple addbiblio.pl,1.52.2.7,1.52.2.8
From: |
Henri-Damien LAURENT |
Subject: |
[Koha-cvs] CVS: koha/acqui.simple addbiblio.pl,1.52.2.7,1.52.2.8 |
Date: |
Wed, 25 May 2005 02:34:42 -0700 |
Update of /cvsroot/koha/koha/acqui.simple
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24539/acqui.simple
Modified Files:
Tag: rel_2_2
addbiblio.pl
Log Message:
Fixing :
- Enabling Selection of Default Framework, event though it wasnot the framework
of the biblio.
Adding
- Saving Framework Changes when editing a biblio.
Display improvements
Index: addbiblio.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/addbiblio.pl,v
retrieving revision 1.52.2.7
retrieving revision 1.52.2.8
diff -C2 -r1.52.2.7 -r1.52.2.8
*** addbiblio.pl 24 May 2005 20:29:40 -0000 1.52.2.7
--- addbiblio.pl 25 May 2005 09:34:40 -0000 1.52.2.8
***************
*** 351,354 ****
--- 351,355 ----
$frameworkcode = &MARCfind_frameworkcode($dbh,$bibid) if ($bibid and
not ($frameworkcode));
}
+ $frameworkcode='' if ($frameworkcode eq 'Default');
my ($template, $loggedinuser, $cookie)
= get_template_and_user({template_name => "acqui.simple/addbiblio.tmpl",
***************
*** 366,371 ****
my @select_fwk;
my $curfwk;
! push @select_fwk,"";
! $select_fwk{""} = "Default";
while (my ($description, $fwk) =$queryfwk->fetchrow) {
push @select_fwk, $fwk;
--- 367,372 ----
my @select_fwk;
my $curfwk;
! push @select_fwk,"Default";
! $select_fwk{"Default"} = "Default";
while (my ($description, $fwk) =$queryfwk->fetchrow) {
push @select_fwk, $fwk;
***************
*** 426,429 ****
--- 427,431 ----
my $oldbibitemnum;
if ($is_a_modif) {
+ NEWmodbiblioframework($dbh,$bibid,$frameworkcode);
NEWmodbiblio($dbh,$record,$bibid,$frameworkcode);
} else {
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/acqui.simple addbiblio.pl,1.52.2.7,1.52.2.8,
Henri-Damien LAURENT <=