Subversion Repositories DevTools

Rev

Rev 3552 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3552 Rev 3890
Line 384... Line 384...
384 
 
 384 
 
385 
    #
 385 
    #
386 
    #   Cleanup
 386 
    #   Cleanup
387 
    #
 387 
    #
388 
    close OUTFILE;
 388 
    close OUTFILE;
389 
    unlink $opt_ofile;
 389 
    unlink( $opt_ofile);
390 
    rename $opt_work_file ,$opt_ofile;
 390 
    rename ($opt_work_file ,$opt_ofile);
391 
    display_unused();
 391 
    display_unused();
392 
}
 392 
}
393 
 
 393 
 
394 
#-------------------------------------------------------------------------------
 394 
#-------------------------------------------------------------------------------
395 
# Function        : process_xml_build_file
 395 
# Function        : process_xml_build_file
Line 639... Line 639...
639 
            push @lines, $_ . $eol foreach (@line );
 639 
            push @lines, $_ . $eol foreach (@line );
640 
        } else {
 640 
        } else {
641 
            push @lines, $eol;
 641 
            push @lines, $eol;
642 
        }
 642 
        }
643 
    }
 643 
    }
644 
    return @lines;
 - 
 
645 
    close INFILE;
 644 
    close INFILE;
- 
 
 645 
    return @lines;
646 
}
 646 
}
647 
 
 647 
 
648 
#-------------------------------------------------------------------------------
 648 
#-------------------------------------------------------------------------------
649 
# Function        : display_unused
 649 
# Function        : display_unused
650 
#
 650 
#