Bug 5385: POD Cleanups (part 2)

[koha.git] / cataloguing / addbiblio.pl

diff --git a/cataloguing/addbiblio.pl b/cataloguing/addbiblio.pl
index 85c0566..86c049e 100755 (executable)
--- a/cataloguing/addbiblio.pl
+++ b/cataloguing/addbiblio.pl
@@ -45,7 +45,9 @@ if ( C4::Context->preference('marcflavour') eq 'UNIMARC' ) {
 
 our($tagslib,$authorised_values_sth,$is_a_modif,$usedTagsLib,$mandatory_z3950);
 
 
 our($tagslib,$authorised_values_sth,$is_a_modif,$usedTagsLib,$mandatory_z3950);
 

-=item MARCfindbreeding
+=head1 FUNCTIONS
+
+=head2 MARCfindbreeding

 
     $record = MARCfindbreeding($breedingid);
 
 
     $record = MARCfindbreeding($breedingid);
 


@@ -152,7 +154,7 @@ sub MARCfindbreeding {
     return -1;
 }
 
     return -1;
 }
 

-=item build_authorized_values_list
+=head2 build_authorized_values_list

 
 =cut
 
 
 =cut
 


@@ -243,7 +245,7 @@ sub build_authorized_values_list ($$$$$$$) {
     );
 }
 
     );
 }
 

-=item CreateKey
+=head2 CreateKey

 
     Create a random value to set it into the input name
 
 
     Create a random value to set it into the input name
 


@@ -253,11 +255,11 @@ sub CreateKey(){
     return int(rand(1000000));
 }
 
     return int(rand(1000000));
 }
 

-=item GetMandatoryFieldZ3950
+=head2 GetMandatoryFieldZ3950

 
     This function return an hashref which containts all mandatory field
     to search with z3950 server.
 
     This function return an hashref which containts all mandatory field
     to search with z3950 server.

-    
+

 =cut
 
 sub GetMandatoryFieldZ3950($){
 =cut
 
 sub GetMandatoryFieldZ3950($){


@@ -277,7 +279,7 @@ sub GetMandatoryFieldZ3950($){
     };
 }
 
     };
 }
 

-=item create_input
+=head2 create_input

 
  builds the <input ...> entry for a subfield.
 
 
  builds the <input ...> entry for a subfield.
 


@@ -514,7 +516,7 @@ sub create_input {
 }
 
 
 }
 
 

-=item format_indicator
+=head2 format_indicator

 
 Translate indicator value for output form - specifically, map
 indicator = ' ' to ''.  This is for the convenience of a cataloger
 
 Translate indicator value for output form - specifically, map
 indicator = ' ' to ''.  This is for the convenience of a cataloger