/[Frey]/trunk/lib/Frey/Class/Refactor.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 /trunk/lib/Frey/Class/Refactor.pm

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

revision 772 by dpavlin, Tue Dec 9 20:31:33 2008 UTC revision 788 by dpavlin, Wed Dec 10 13:55:38 2008 UTC
# Line 14  has from => ( Line 14  has from => (
14          is => 'rw',          is => 'rw',
15          isa => 'Str',          isa => 'Str',
16          required => 1,          required => 1,
17          default => 'Frey::HTML',          default => 'Frey::',
18  );  );
19    
20  has to => (  has to => (
21          is => 'rw',          is => 'rw',
22          isa => 'Str',          isa => 'Str',
23          required => 1,          required => 1,
24          default => 'Frey::HTML::Tree',          default => 'Frey::HTML::',
25  );  );
26    
27    
# Line 40  sub as_markup { Line 40  sub as_markup {
40    
41          my $change_number = 0;          my $change_number = 0;
42    
         sub strip {  
                 my $t = shift;  
                 $t =~ s{^\s+}{}gs;  
                 $t =~ s{>\s+<}{><}gs;  
                 $t =~ s{\s+$}{}gs;  
                 return $t;  
         }  
   
43          my $grep = Frey::Shell::Grep->new(          my $grep = Frey::Shell::Grep->new(
44                  pattern => $self->from,                  pattern => $self->from,
45          )->as_markup(          )->as_markup(
Legend:
Removed from v.772  
changed lines
  Added in v.788
  ViewVC Help
Powered by ViewVC 1.1.26