Subversion Repositories DevTools

Rev

Rev 379 | Rev 5709 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 379 Rev 4386
Line 62... Line 62...
62 
    my($self) = @_;
 62 
    my($self) = @_;
63 
    if ( $cacheDir )
 63 
    if ( $cacheDir )
64 
    {
 64 
    {
65 
        my $toccache = "$cacheDir/pod2htmt.tmp";
 65 
        my $toccache = "$cacheDir/pod2htmt.tmp";
66 
        open(CACHE, "<$toccache") ||
 66 
        open(CACHE, "<$toccache") ||
67 
            die "$0: error opening $toccache for reading: $!\n";
 67 
            die "$0: error opening(toccache) $toccache for reading: $!\n";
68 
        $/ = "\n";
 68 
        $/ = "\n";
69 
 
 69 
 
70 
        #
 70 
        #
71 
        #   Skip first two lines
 71 
        #   Skip first two lines
72 
        #       PodPath
 72 
        #       PodPath