[Koha-cvs] CVS: koha/misc koha.upgrade,1.3,1.4

[Andrew Arensburger]

Update of /cvsroot/koha/koha/misc
In directory sc8-pr-cvs1:/tmp/cvs-serv11408

Modified Files:
	koha.upgrade 
Log Message:
Removed two "my" declarations that were masking previous variable
declarations, to make 'perl -w' happy.


Index: koha.upgrade
===================================================================
RCS file: /cvsroot/koha/koha/misc/koha.upgrade,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** koha.upgrade	15 Jan 2003 13:04:20 -0000	1.3
--- koha.upgrade	22 Jan 2003 03:45:39 -0000	1.4
***************
*** 337,341 ****
  
  opendir D, "$backupdir/kohafiles-$date/opac/htdocs/";
! my @dirlist=readdir D;
  foreach (@dirlist) {
      (next) if (/^\./);
--- 337,341 ----
  
  opendir D, "$backupdir/kohafiles-$date/opac/htdocs/";
! @dirlist=readdir D;
  foreach (@dirlist) {
      (next) if (/^\./);