/[gnump3d]/gnump3d/lib/gnump3d/plugins/now.pm
ViewVC logotype

Diff of /gnump3d/lib/gnump3d/plugins/now.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by skx, Thu Oct 9 11:26:52 2003 UTC revision 1.3 by skx, Thu Oct 16 11:59:51 2003 UTC
# Line 103  sub handlePath( ) Line 103  sub handlePath( )
103      foreach my $ip ( @serving )      foreach my $ip ( @serving )
104      {      {
105          my @files    = &readFile( $NOW_PLAYING_PATH . "/" . $ip );          my @files    = &readFile( $NOW_PLAYING_PATH . "/" . $ip );
106            my $time     = &getModifiedTime( $NOW_PLAYING_PATH . "/" . $ip );
107          my $file     = $files[0];          my $file     = $files[0];
108          my $display = "";   # Tag info to display.          my $display = "";   # Tag info to display.
109          my $link    = "";   # Link to the file.          my $link    = "";   # Link to the file.
# Line 172  sub handlePath( ) Line 173  sub handlePath( )
173    
174          if ( $count eq "1" )          if ( $count eq "1" )
175            {            {
176          $output .= "<tr><td><b>Client</b></td><td><b>Track</b></td><td><b>Directory</b></td></td>\n";          $output .= "<tr><td><b>Client</b></td><td><b>Time</b></td><td><b>Track</b></td><td><b>Directory</b></td></td>\n";
177            }            }
178          $output .= "<tr><td>$host</td><td><a href='$link$extension'>$display</a></td><td><a href='$dir'>$dirDisplay</a></td></td>\n";          $output .= "<tr><td>$host</td><td>$time</td><td><a href='$link$extension'>$display</a></td><td><a href='$dir'>$dirDisplay</a></td></td>\n";
179      }      }
180    
181      if ( $count eq 0 )      if ( $count eq 0 )

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26