/[VRac]/Session.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /Session.pm

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

revision 170 by dpavlin, Mon Aug 6 09:20:49 2007 UTC revision 186 by dpavlin, Sun Sep 30 19:50:30 2007 UTC
# Line 89  sub event { Line 89  sub event {
89          push @timeline, $t;          push @timeline, $t;
90          $s->{$t}->{$name} = $value;          $s->{$t}->{$name} = $value;
91    
92          warn "## created event($dt,$name,",dump($value),")\n";  #       warn "## created event($dt,$name,",dump($value),")\n";
93  }  }
94    
95  =head2 load_session  =head2 load_session
# Line 108  sub load_session { Line 108  sub load_session {
108          }          }
109    
110          eval read_file( $path );          eval read_file( $path );
111          warn "session = ",dump( $s );          warn "session = ",dump( $s ) if $self->debug;
112    
113          my ( $from, $to ) = @timeline[0,-1];          my ( $from, $to ) = @timeline[0,-1];
114          printf "loaded session %.2f-%.2fs with %d events\n", $from / 1000, $to / 1000, $#timeline + 1;          printf "loaded session %.2f-%.2fs with %d events\n", $from / 1000, $to / 1000, $#timeline + 1;
Legend:
Removed from v.170  
changed lines
  Added in v.186
  ViewVC Help
Powered by ViewVC 1.1.26