CVS: koha/C4 Output.pm,1.6.2.2,1.6.2.3

25 Apr 2002


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

Modified Files:
      Tag: rel-1-2
	Output.pm 
Log Message:
more prototypes in Output.pm

Index: Output.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Output.pm,v
retrieving revision 1.6.2.2
retrieving revision 1.6.2.3
diff -C2 -r1.6.2.2 -r1.6.2.3
*** Output.pm	25 Apr 2002 15:51:33 -0000	1.6.2.2
--- Output.pm	25 Apr 2002 16:12:45 -0000	1.6.2.3
***************
*** 163,167 ****
  }
  
! sub mktableft {
    return("</table>\n");
  }
--- 163,167 ----
  }
  
! sub mktableft() {
    return("</table>\n");
  }
***************
*** 350,358 ****
  
  
! sub endpage{
    return("</body></html>\n");
  }
  
! sub mklink {
    my ($url,$text)=@_;
    my $string="<a href=\"$url\">$text</a>";
--- 350,358 ----
  
  
! sub endpage() {
    return("</body></html>\n");
  }
  
! sub mklink($$)  {
    my ($url,$text)=@_;
    my $string="<a href=\"$url\">$text</a>";
***************
*** 375,387 ****
  }
  
! sub center {
    return ("<CENTER>\n");
  }  
  
! sub endcenter {
    return ("</CENTER>\n");
  }  
  
! sub bold {
    my ($text)=@_;
    my $string="<b>$text</b>";
--- 375,387 ----
  }
  
! sub center() {
    return ("<CENTER>\n");
  }  
  
! sub endcenter() {
    return ("</CENTER>\n");
  }  
  
! sub bold($) {
    my ($text)=@_;
    my $string="<b>$text</b>";

Pat Eyler

tags

participants (1)