[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/C4 Search.pm [rel_3_0]
From: |
Antoine Farnault |
Subject: |
[Koha-cvs] koha/C4 Search.pm [rel_3_0] |
Date: |
Mon, 16 Oct 2006 09:21:34 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch: rel_3_0
Changes by: Antoine Farnault <toins> 06/10/16 09:21:34
Modified files:
C4 : Search.pm
Log message:
fix some POD syntax error.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Search.pm?cvsroot=koha&only_with_tag=rel_3_0&r1=1.120.2.7&r2=1.120.2.8
Patches:
Index: Search.pm
===================================================================
RCS file: /sources/koha/koha/C4/Search.pm,v
retrieving revision 1.120.2.7
retrieving revision 1.120.2.8
diff -u -b -r1.120.2.7 -r1.120.2.8
--- Search.pm 10 Oct 2006 15:45:26 -0000 1.120.2.7
+++ Search.pm 16 Oct 2006 09:21:33 -0000 1.120.2.8
@@ -40,7 +40,7 @@
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
# set the version for version checking
-$VERSION = do { my @v = '$Revision: 1.120.2.7 $' =~ /\d+/g;
+$VERSION = do { my @v = '$Revision: 1.120.2.8 $' =~ /\d+/g;
shift(@v) . "." . join("_", map {sprintf "%03d", $_ } @v); };
=head1 NAME
@@ -58,6 +58,8 @@
=head1 FUNCTIONS
+=over 2
+
=cut
@ISA = qw(Exporter);
@@ -87,14 +89,14 @@
&getMARCnotes &getMARCsubjects &getMARCurls);
# make all your functions, whether exported or not;
-=head1 findseealso($dbh,$fields);
+=item findseealso($dbh,$fields);
-=head2 $dbh is a link to the DB handler.
+C<$dbh> is a link to the DB handler.
use C4::Context;
my $dbh =C4::Context->dbh;
-=head2 $fields is a reference to the fields array
+C<$fields> is a reference to the fields array
This function modify the @$fields array and add related fields to search on.
@@ -125,6 +127,7 @@
of references to hash, which gives the actual results.
=cut
+
#'
sub findguarantees{
my ($bornum)address@hidden;
@@ -156,6 +159,7 @@
from the C<borrowers> database table;
=cut
+
#'
sub findguarantor{
my ($bornum)address@hidden;
@@ -178,6 +182,7 @@
Allocates a new, unused borrower number, and returns it.
=cut
+
#'
# FIXME - This is identical to C4::Circulation::Borrower::NewBorrowerNumber.
# Pick one and stick with it. Preferably use the other one. This function
@@ -231,6 +236,7 @@
=back
=cut
+
#'
sub catalogsearch {
my ($dbh, $tags, $and_or, $excluding, $operator, $value,
$offset,$length,$orderby,$desc_or_asc) = @_;
@@ -488,6 +494,7 @@
C<$num> to 5 will return results 100 through 104 inclusive.
=cut
+
#'
sub KeywordSearch {
my ($env,$type,$search,$num,$offset)address@hidden;
@@ -908,6 +915,7 @@
not ordered.
=cut
+
#'
sub CatSearch {
my ($env,$type,$search,$num,$offset)address@hidden;
@@ -1240,6 +1248,7 @@
=back
=cut
+
#'
sub ItemInfo {
my ($env,$biblionumber,$type) = @_;
@@ -1334,6 +1343,7 @@
is lost.
=cut
+
#'
sub GetItems {
my ($env,$biblionumber)address@hidden;
@@ -1385,6 +1395,7 @@
the Koha database.
=cut
+
#'
sub itemdata {
my ($barcode)address@hidden;
@@ -1416,6 +1427,7 @@
the first one is considered.
=cut
+
#'
sub bibdata {
my ($bibnum, $type) = @_;
@@ -1474,6 +1486,7 @@
that C<biblioitems.notes> is given as C<$itemdata-E<gt>{bnotes}>.
=cut
+
#'
sub bibitemdata {
my ($bibitem) = @_;
@@ -1499,6 +1512,7 @@
elements in C<$subjects>.
=cut
+
#'
sub subject {
my ($bibnum)address@hidden;
@@ -1527,6 +1541,7 @@
elements in C<$authors>.
=cut
+
#'
sub addauthor {
my ($bibnum)address@hidden;
@@ -1554,6 +1569,7 @@
elements in C<$subtitles>.
=cut
+
#'
sub subtitle {
my ($bibnum)address@hidden;
@@ -1613,6 +1629,7 @@
=back
=cut
+
#'
sub itemissues {
my ($bibitem, $biblio)address@hidden;
@@ -1693,6 +1710,7 @@
database.
=cut
+
#'
sub itemnodata {
my ($env,$dbh,$itemnumber) = @_;
@@ -1730,6 +1748,7 @@
C<$count> is the number of elements in C<$borrowers>.
=cut
+
#'
#used by member enquiries from the intranet
#called by member.pl
@@ -1790,6 +1809,7 @@
the C<borrowers> table in the Koha database.
=cut
+
#'
sub borrdata {
my ($cardnumber,$bornum)address@hidden;
@@ -1833,6 +1853,7 @@
C<$issues>.
=cut
+
#'
sub borrissues {
my ($bornum)address@hidden;
@@ -1870,6 +1891,7 @@
elements in C<$issues>
=cut
+
#'
sub allissues {
my ($bornum,$order,$limit)address@hidden;
@@ -1911,6 +1933,7 @@
the total fine currently due by the borrower.
=cut
+
#'
sub borrdata2 {
my ($env,$bornum)address@hidden;
@@ -1987,6 +2010,7 @@
total amount outstanding for all of the account lines.
=cut
+
#'
sub getboracctrecord {
my ($env,$params) = @_;
@@ -2056,6 +2080,7 @@
(aqorders.quantity - aqorders.quantityreceived).
=cut
+
#'
# FIXME - There's also a &C4::Biblio::itemcount.
@@ -2164,6 +2189,7 @@
=back
=cut
+
#'
sub itemcount2 {
my ($env,$bibnum,$type)address@hidden;
@@ -2247,6 +2273,7 @@
Given an item type code, returns the description for that type.
=cut
+
#'
# FIXME - I'm pretty sure that after the initial setup, the list of
@@ -2296,6 +2323,7 @@
all copies are lost; otherwise, there is at least one copy available.
=cut
+
#'
sub bibitems {
my ($bibnum) = @_;
@@ -2332,6 +2360,7 @@
The returned items include very overdue items, but not lost ones.
=cut
+
#'
sub barcodes{
#called from request.pl
@@ -2364,6 +2393,7 @@
fields from the C<websites> table in the Koha database.
=cut
+
#'
sub getwebsites {
my ($biblionumber) = @_;
@@ -2401,6 +2431,7 @@
C<biblioitems> table of the Koha database.
=cut
+
#'
sub getwebbiblioitems {
my ($biblionumber) = @_;
@@ -3325,7 +3356,7 @@
$oldbiblio->{wthdrawncount} = $wthdrawn_count;
$oldbiblio->{itemlostcount} = $itemlost_count;
-=head1
+=head1 FIXME
Ugh ... this is ugly, I'll re-write it better above then delete it
my $norequests = 1;
- [Koha-cvs] koha/C4 Search.pm [rel_3_0],
Antoine Farnault <=
- [Koha-cvs] koha/C4 Search.pm [rel_3_0], Antoine Farnault, 2006/10/16
- [Koha-cvs] koha/C4 Search.pm [rel_3_0], Antoine Farnault, 2006/10/20
- [Koha-cvs] koha/C4 Search.pm [rel_3_0], Antoine Farnault, 2006/10/23
- [Koha-cvs] koha/C4 Search.pm [rel_3_0], Antoine Farnault, 2006/10/23
- [Koha-cvs] koha/C4 Search.pm [rel_3_0], Antoine Farnault, 2006/10/23
- [Koha-cvs] koha/C4 Search.pm [rel_3_0], paul poulain, 2006/10/30
- [Koha-cvs] koha/C4 Search.pm [rel_3_0], Antoine Farnault, 2006/10/30
- [Koha-cvs] koha/C4 Search.pm [rel_3_0], Antoine Farnault, 2006/10/31