[Koha-cvs] CVS: koha/C4 Acquisitions.pm,1.24.2.2,1.24.2.3

[Andrew Arensburger]

Update of /cvsroot/koha/koha/C4
In directory usw-pr-cvs1:/tmp/cvs-serv31012

Modified Files:
      Tag: arensb-context
        Acquisitions.pm 
Log Message:
Added a whole mess of FIXME comments.


Index: Acquisitions.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Acquisitions.pm,v
retrieving revision 1.24.2.2
retrieving revision 1.24.2.3
diff -C2 -r1.24.2.2 -r1.24.2.3
*** Acquisitions.pm     5 Oct 2002 04:08:49 -0000       1.24.2.2
--- Acquisitions.pm     5 Oct 2002 06:11:22 -0000       1.24.2.3
***************
*** 642,646 ****
    return($spent,$comtd);
  }
!       
  # XXX - POD
  sub newbiblio {
--- 642,648 ----
    return($spent,$comtd);
  }
! 
! # FIXME - This is in effect identical to &C4::Biblio::newbiblio.
! # Pick one and stick with it.
  # XXX - POD
  sub newbiblio {
***************
*** 681,684 ****
--- 683,688 ----
  }
  
+ # FIXME - This is in effect the same as &C4::Biblio::modbiblio.
+ # Pick one and stick with it.
  # XXX - POD
  sub modbiblio {
***************
*** 715,718 ****
--- 719,724 ----
  } # sub modbiblio
  
+ # FIXME - This is in effect identical to &C4::Biblio::modsubtitle.
+ # Pick one and stick with it.
  # XXX - POD
  sub modsubtitle {
***************
*** 730,733 ****
--- 736,740 ----
  # XXX - POD
  # FIXME - This is functionally identical to &C4::Biblio::modaddauthor
+ # Pick one and stick with it.
  sub modaddauthor {
      my ($bibnum, $author) = @_;
***************
*** 751,754 ****
--- 758,763 ----
  } # sub modaddauthor
  
+ # FIXME - This is in effect identical to &C4::Biblio::modsubject.
+ # Pick one and stick with it.
  # XXX - POD
  sub modsubject {
***************
*** 819,822 ****
--- 828,833 ----
  } # sub modsubject
  
+ # FIXME - This is very similar to &C4::Biblio::modbibitem.
+ # Pick one and stick with it.
  # XXX - POD
  sub modbibitem {
***************
*** 865,868 ****
--- 876,881 ----
  } # sub modbibitem
  
+ # FIXME - This is in effect identical to &C4::Biblio::modnote.
+ # Pick one and stick with it.
  # XXX - POD
  sub modnote {
***************
*** 945,948 ****
--- 958,963 ----
  }
  
+ # FIXME - This is in effect identical to &C4::Biblio::newsubject.
+ # Pick one and stick with it.
  # XXX - POD
  sub newsubject {
***************
*** 959,962 ****
--- 974,978 ----
  # XXX - POD
  # FIXME - This is in effect the same as &C4::Biblio::newsubtitle
+ # Pick one and stick with it.
  sub newsubtitle {
    my ($bibnum, $subtitle) = @_;
***************
*** 1361,1364 ****
--- 1377,1382 ----
  #'
  # FIXME - This function appears in C4::Catalogue
+ # FIXME - This is different from &C4::Biblio::newitems, though both
+ # are exported.
  sub newitems {
    my ($item, @barcodes) = @_;
***************
*** 1415,1418 ****
--- 1433,1438 ----
  }
  
+ # FIXME - This is the same as &C4::Biblio::Checkitems.
+ # Pick one and stick with it.
  # XXX - POD
  sub checkitems{
***************
*** 1433,1436 ****
--- 1453,1459 ----
  }
  
+ # FIXME - This appears to be functionally equivalent to
+ # &C4::Biblio::moditem.
+ # Pick one and stick with it.
  # XXX - POD
  sub moditem {
***************
*** 1468,1471 ****
--- 1491,1496 ----
  }
  
+ # FIXME - This is identical to &C4::Biblio::countitems.
+ # Pick one and stick with it.
  # XXX - POD
  sub countitems{
***************
*** 1518,1521 ****
--- 1543,1547 ----
  
  # FIXME - A nearly-identical function, appears in C4::Biblio
+ # Pick one and stick with it.
  # XXX - POD
  sub delitem{
***************
*** 1542,1545 ****
--- 1568,1573 ----
  }
  
+ # FIXME - This is functionally identical to &C4::Biblio::deletebiblioitem.
+ # Pick one and stick with it.
  # XXX - POD
  sub deletebiblioitem {
***************
*** 1597,1600 ****
--- 1625,1630 ----
  } # sub deletebiblioitem
  
+ # FIXME - This is functionally identical to &C4::Biblio::delbiblio.
+ # Pick one and stick with it.
  # XXX - POD
  sub delbiblio{
***************
*** 1645,1648 ****
--- 1675,1680 ----
  } # sub getitemtypes
  
+ # FIXME - This is identical to &C4::Biblio::getitemtypes.
+ # Pick one and stick with it.
  # XXX - POD
  sub getbiblio {
***************
*** 1687,1690 ****
--- 1719,1724 ----
  } # sub getbiblioitem
  
+ # FIXME - This is identical to &C4::Biblio::getbiblioitem.
+ # Pick one and stick with it.
  # XXX - POD
  sub getbiblioitembybiblionumber {
***************
*** 1708,1711 ****
--- 1742,1748 ----
  } # sub
  
+ # FIXME - This is identical to
+ # &C4::Biblio::getbiblioitembybiblionumber.
+ # Pick one and stick with it.
  # XXX - POD
  sub getitemsbybiblioitem {
***************
*** 1731,1734 ****
--- 1768,1773 ----
  } # sub getitemsbybiblioitem
  
+ # FIXME - This is identical to &C4::Biblio::isbnsearch.
+ # Pick one and stick with it.
  # XXX - POD
  sub isbnsearch {