/[Frey]/branches/zimbardo/lib/Frey/SVN.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 /branches/zimbardo/lib/Frey/SVN.pm

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

revision 1189 by dpavlin, Sun Jul 5 21:40:16 2009 UTC revision 1190 by dpavlin, Mon Sep 28 20:24:18 2009 UTC
# Line 130  sub iterator { Line 130  sub iterator {
130                          my $diff_path = "$cache/$rev.diff";                          my $diff_path = "$cache/$rev.diff";
131                          $e->{diff} = $self->load( $diff_path ) if $self->include_diff && -e $diff_path;                          $e->{diff} = $self->load( $diff_path ) if $self->include_diff && -e $diff_path;
132    
133                          my $diff_yaml = "$cache/$rev.yaml";                          my $path = "$cache/$rev.storable";
134                            my $data;
135    
136                          if ( -e $diff_yaml ) {                          if ( -e $path ) {
137                                  $e->{diff_paths} = $self->load( $diff_yaml );                                  $data = $self->load( $path );
138                                    $e->{diff_paths} = $data->{diff_paths};
139                          } else {                          } else {
140                                  my $cmd = "svn diff -c $rev $svn_path";                                  my $cmd = "svn diff -c $rev $svn_path";
141                                  my ( $diff_fh, $diff_out );                                  my ( $diff_fh, $diff_out );
# Line 161  sub iterator { Line 163  sub iterator {
163                                  }                                  }
164    
165                                  $e->{diff} = $diff if $self->include_diff;                                  $e->{diff} = $diff if $self->include_diff;
   
                                 $self->store( "$cache/$rev.yaml", $changes );  
166                                  $e->{diff_paths} = $changes;                                  $e->{diff_paths} = $changes;
167    
168                                    $self->store( $path, $e ) if $self->include_diff && $self->file_stats;
169                          }                          }
170                    
171                  }                  }
Legend:
Removed from v.1189  
changed lines
  Added in v.1190
  ViewVC Help
Powered by ViewVC 1.1.26