- Koha-devel - lists.koha-community.org

CVS: koha/C4 Reserves2.pm,1.4,1.5
by Finlay Thompson 22 Apr '02

22 Apr '02

Update of /cvsroot/koha/koha/C4 In directory usw-pr-cvs1:/tmp/cvs-serv6988 Modified Files: Reserves2.pm Log Message: Fixed typo Index: Reserves2.pm =================================================================== RCS file: /cvsroot/koha/koha/C4/Reserves2.pm,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -r1.4 -r1.5 *** Reserves2.pm 13 Mar 2002 03:26:43 -0000 1.4 --- Reserves2.pm 23 Apr 2002 00:34:16 -0000 1.5 *************** *** 16,21 **** @ISA = qw(Exporter); ! @EXPORT = qw(&FindReserves &CreateReserve &updatereserves &getreservetitle ! Findgroupreserve); %EXPORT_TAGS = ( ); # eg: TAG => [ qw!name1 name2! ], --- 16,20 ---- @ISA = qw(Exporter); ! @EXPORT = qw(&FindReserves &CreateReserve &updatereserves &getreservetitle &Findgroupreserve); %EXPORT_TAGS = ( ); # eg: TAG => [ qw!name1 name2! ],

1 0

CVS: koha/C4 Koha.pm,1.3,1.4
by Finlay Thompson 22 Apr '02

22 Apr '02

Update of /cvsroot/koha/koha/C4 In directory usw-pr-cvs1:/tmp/cvs-serv12422 Modified Files: Koha.pm Log Message: fixed typo Index: Koha.pm =================================================================== RCS file: /cvsroot/koha/koha/C4/Koha.pm,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -r1.3 -r1.4 *** Koha.pm 17 Apr 2002 21:35:53 -0000 1.3 --- Koha.pm 22 Apr 2002 22:47:09 -0000 1.4 *************** *** 34,38 **** } elsif ($ethnicity eq 'pi') { $ethnicity = 'Pacific Islander' ! } elsif ($ehtnicity eq 'asian') { $ethnicity = 'Asian'; } --- 34,38 ---- } elsif ($ethnicity eq 'pi') { $ethnicity = 'Pacific Islander' ! } elsif ($ethnicity eq 'asian') { $ethnicity = 'Asian'; }

1 0

About ItemInfo + branches + detail.pm
by Roger Buck 22 Apr '02

22 Apr '02

I think that sub ItemInfo? (Search.pm) returns no data if items.holdingbranch is NULL. The result is that detail.pl info table remains blank and "Total number of items appears as "0" in the biblio detail.pl record table. Doesn't seem to make sense..? Is that the desired result... ? R.

1 1

CVS: koha/C4 Acquisitions.pm,1.4,1.5
by Chris Cormack 21 Apr '02

21 Apr '02

Update of /cvsroot/koha/koha/C4 In directory usw-pr-cvs1:/tmp/cvs-serv14189/C4 Modified Files: Acquisitions.pm Log Message: Fixing bug reported by Steve, Couldnt remove an additional Author when modifying a biblio Index: Acquisitions.pm =================================================================== RCS file: /cvsroot/koha/koha/C4/Acquisitions.pm,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -r1.4 -r1.5 *** Acquisitions.pm 15 Apr 2002 05:33:33 -0000 1.4 --- Acquisitions.pm 21 Apr 2002 06:33:32 -0000 1.5 *************** *** 19,22 **** --- 19,23 ---- &getallorders &getrecorders &updatecurrencies &getorder &getcurrency &updaterecorder &updatecost &checkitems &modnote &getitemtypes &getbiblio); + %EXPORT_TAGS = ( ); # eg: TAG => [ qw!name1 name2! ], *************** *** 420,425 **** my ($bibnum,$title,$author,$copyright,$seriestitle,$serial,$unititle,$notes)=@_; my $dbh=C4Connect; - #$title=~ s/\'/\\\'/g; - #$author=~ s/\'/\\\'/g; my $query="update biblio set title='$title', author='$author',copyrightdate='$copyright', --- 421,424 ---- *************** *** 450,458 **** my $sth=$dbh->prepare($query); $sth->execute; - $query="insert into additionalauthors (author,biblionumber) values ('$author','$bibnum')"; - $sth->finish; - $sth=$dbh->prepare($query); - $sth->execute; $sth->finish; $dbh->disconnect; } --- 449,459 ---- my $sth=$dbh->prepare($query); $sth->execute; $sth->finish; + if ($author ne ''){ + $query="insert into additionalauthors (author,biblionumber) values ('$author','$bibnum')"; + $sth=$dbh->prepare($query); + $sth->execute; + $sth->finish; + } $dbh->disconnect; }

1 0

CVS: koha-html/opac-html/cat index.html,1.3,1.4
by Roger Buck 21 Apr '02

21 Apr '02

Update of /cvsroot/koha/koha-html/opac-html/cat In directory usw-pr-cvs1:/tmp/cvs-serv5189 Modified Files: index.html Log Message: Removed hard coded class list to new file: /includes/cat-class-list.inc Index: index.html =================================================================== RCS file: /cvsroot/koha/koha-html/opac-html/cat/index.html,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -r1.3 -r1.4 *** index.html 21 Nov 2001 04:34:45 -0000 1.3 --- index.html 21 Apr 2002 05:40:15 -0000 1.4 *************** *** 1,4 **** !  !  <CENTER> <FORM ACTION="/cgi-bin/koha/search.pl" method=post> --- 1,6 ---- !  !  !  ! <CENTER> <FORM ACTION="/cgi-bin/koha/search.pl" method=post> *************** *** 12,18 **** <TD>Keywords</TD> <TD><INPUT TYPE="text" SIZE="25" NAME="keyword"></TD> - - - </TD></TR> <TR VALIGN=TOP> --- 14,17 ---- *************** *** 28,58 **** <TD>Subject</TD> <TD><INPUT TYPE="text" SIZE="25" NAME="subject"></TD></TR> ! ! ! <TR VALIGN=TOP> ! <TD>Class</TD> <TD><select SIZE="1" NAME="class"> ! <option value="">Any ! <option value="CD">CD Roms ! <option value="c">Children ! <option value="Fiction">Fiction ! <option value="lp">Large Print ! <option value="nf">Non Fiction ! <option value="p">Posters & Art Works ! <option value="ref">Reference ! <option value="tb">Talking Books ! <option value="VID">Video ! <option value="ya">Young Adult ! </select> ! ! </TD> ! </TR> ! ! !  <TR VALIGN=TOP> <TD>Item Number</TD> <TD><INPUT TYPE="text" SIZE="25" NAME="item"></TD></TR> !  --- 27,46 ---- <TD>Subject</TD> <TD><INPUT TYPE="text" SIZE="25" NAME="subject"></TD></TR> + <td>Class</td> + <td> + <select size="1" name="class"> + <option value="">Any +  +  + </select> + </td> + </tr> !  <TR VALIGN=TOP> <TD>Item Number</TD> <TD><INPUT TYPE="text" SIZE="25" NAME="item"></TD></TR> ! !  *************** *** 67,69 **** </FORM> </CENTER> !  --- 55,59 ---- </FORM> </CENTER> ! !  !

1 0

CVS: koha-html/intranet-html/catalogue index.html,1.4,1.5
by Roger Buck 21 Apr '02

21 Apr '02

Update of /cvsroot/koha/koha-html/intranet-html/catalogue In directory usw-pr-cvs1:/tmp/cvs-serv4783 Modified Files: index.html Log Message: Removed hard coded class list - now fetched from new file: cat-class-list.inc Index: index.html =================================================================== RCS file: /cvsroot/koha/koha-html/intranet-html/catalogue/index.html,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -r1.4 -r1.5 *** index.html 20 Mar 2002 10:01:15 -0000 1.4 --- index.html 21 Apr 2002 05:38:04 -0000 1.5 *************** *** 1,7 **** !  !  !  <FORM ACTION="/cgi-bin/koha/search.pl" method=post> --- 1,8 ---- !  !  !  !  <FORM ACTION="/cgi-bin/koha/search.pl" method=post> *************** *** 17,23 **** <TR VALIGN=TOP> <TD>Item Number</TD> <TD><INPUT TYPE="text" SIZE="25" NAME="item"></td><td> <b>     OR</b></TD></TR> !  <TR VALIGN=TOP> <TD colspan=2 >  </td></TR> --- 18,24 ---- <TR VALIGN=TOP> <TD>Item Number</TD> <TD><INPUT TYPE="text" SIZE="25" NAME="item"></td><td> <b>     OR</b></TD></TR> !  <TR VALIGN=TOP> <TD colspan=2 >  </td></TR> *************** *** 51,78 **** <TR VALIGN=TOP> ! <TD>Class</TD> <TD><select SIZE="1" NAME="class"> ! <option value="">Any ! <option value="E">Easy / Picture Books ! <option value="ER">Easy Reader ! <option value="JNF">Junior Non-Fiction ! <option value="JF">Junior Fiction ! <option value="TREF">Teacher Reference ! <option value="FYA">Young Adult Fiction ! <option value="REF">Reference Books ! <option value="F">Fiction ! <option value="NF">Non-Fiction ! <option value="CD">Compact Disc !  ! </select> ! ! </TD></TR> !  !  <TR VALIGN=TOP> <TD><b>OR</b></TD></TR> --- 52,72 ---- <TR VALIGN=TOP> ! <TD>Class</TD> ! <td> ! <select name="class" size="1"> ! <option value="">Any !  !  ! </select> ! </td> ! </tr> !  !  <TR VALIGN=TOP> <TD><b>OR</b></TD></TR> *************** *** 91,93 **** </CENTER> !  --- 85,88 ---- </CENTER> !  !

1 0

CVS: koha-html/intranet-html/includes cat-class-list.inc,NONE,1.1
by Roger Buck 21 Apr '02

21 Apr '02

Update of /cvsroot/koha/koha-html/intranet-html/includes In directory usw-pr-cvs1:/tmp/cvs-serv4201a Added Files: cat-class-list.inc Log Message: QuikFix to separate catalogue class list - should really be efetched from DB --- NEW FILE ---  <option value="E">Easy / Picture Books <option value="ER">Easy Reader <option value="JNF">Junior Non-Fiction <option value="JF">Junior Fiction <option value="TREF">Teacher Reference <option value="FYA">Young Adult Fiction <option value="REF">Reference Books <option value="F">Fiction <option value="NF">Non-Fiction <option value="CD">Compact Disc

1 0

CVS: koha-html/opac-html/includes cat-class-list.inc,NONE,1.1
by Roger Buck 21 Apr '02

21 Apr '02

Update of /cvsroot/koha/koha-html/opac-html/includes In directory usw-pr-cvs1:/tmp/cvs-serv3890 Added Files: cat-class-list.inc Log Message: QuikFix to extract catalogue class list - should really be fetched from db --- NEW FILE ---  <option value="E">Easy / Picture Books <option value="ER">Easy Reader <option value="JNF">Junior Non-Fiction <option value="JF">Junior Fiction <option value="TREF">Teacher Reference <option value="FYA">Young Adult Fiction <option value="REF">Reference Books <option value="F">Fiction <option value="NF">Non-Fiction <option value="CD">Compact Disc

1 0

CVS: koha/C4 Output.pm,1.5,1.6
by Roger Buck 20 Apr '02

20 Apr '02

Update of /cvsroot/koha/koha/C4 In directory usw-pr-cvs1:/tmp/cvs-serv30214 Modified Files: Output.pm Log Message: Correct spelling - aquisitions to acquisitions Index: Output.pm =================================================================== RCS file: /cvsroot/koha/koha/C4/Output.pm,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -r1.5 -r1.6 *** Output.pm 8 Apr 2002 23:44:43 -0000 1.5 --- Output.pm 21 Apr 2002 04:45:21 -0000 1.6 *************** *** 94,98 **** open (FILE,"$path/members-top.inc") || die; } elsif ($type eq 'acquisitions'){ ! open (FILE,"$path/aquisitions-top.inc")|| die; } elsif ($type eq 'report'){ open (FILE,"$path/reports-top.inc") || die; --- 94,98 ---- open (FILE,"$path/members-top.inc") || die; } elsif ($type eq 'acquisitions'){ ! open (FILE,"$path/acquisitions-top.inc")|| die; } elsif ($type eq 'report'){ open (FILE,"$path/reports-top.inc") || die; *************** *** 119,123 **** open (FILE,"$path/members-bottom.inc") || die; } elsif ($type eq 'acquisitions') { ! open (FILE,"$path/aquisitions-bottom.inc") || die; } elsif ($type eq 'report') { open (FILE,"$path/reports-bottom.inc") || die; --- 119,123 ---- open (FILE,"$path/members-bottom.inc") || die; } elsif ($type eq 'acquisitions') { ! open (FILE,"$path/acquisitions-bottom.inc") || die; } elsif ($type eq 'report') { open (FILE,"$path/reports-bottom.inc") || die;

1 0

CVS: koha-html/intranet-html/acquisitions index.html,1.3,1.4
by Roger Buck 20 Apr '02

20 Apr '02

Update of /cvsroot/koha/koha-html/intranet-html/acquisitions In directory usw-pr-cvs1:/tmp/cvs-serv28627 Modified Files: index.html Log Message: pelling corrected - aquisitions to acquisitions Index: index.html =================================================================== RCS file: /cvsroot/koha/koha-html/intranet-html/acquisitions/index.html,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -r1.3 -r1.4 *** index.html 20 Mar 2002 10:10:34 -0000 1.3 --- index.html 21 Apr 2002 04:34:31 -0000 1.4 *************** *** 1,18 ****  -   ! ! ! ! ! <FONT SIZE=6><em>Aquisitions</em></FONT><br> ! ! ! <TABLE align="left" width="40%" cellspacing=0 cellpadding=5 border=1 > --- 1,10 ----    ! <FONT SIZE=6><em>Acquisitions</em></FONT><br> <TABLE align="left" width="40%" cellspacing=0 cellpadding=5 border=1 > *************** *** 76,87 **** </table> ! ! ! ! ! ! !  ! ! --- 68,71 ---- </table> !

1 0