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

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

revision 1091 by dpavlin, Sun Jun 28 15:42:05 2009 UTC revision 1092 by dpavlin, Sun Jun 28 16:34:16 2009 UTC
# Line 46  sub create_class_source_as_markup { Line 46  sub create_class_source_as_markup {
46                  }                  }
47          }          }
48    
49          die "no test_path from $class" unless $test_path;          if ( ! $test_path ) {
50                    $test_path = $class;
51                    $test_path =~ s{::}{-}g;
52                    $test_path = "t/30-$test_path.t";
53            }
54    
55          die qq|class "$class" exists as |, $self->path_size($class_path) if -e $class_path;          die qq|class "$class" exists as |, $self->path_size($class_path) if -e $class_path;
56          die qq|class "$class" test exists as |, $self->path_size($test_path) if -e $test_path;          die qq|class "$class" test exists as |, $self->path_size($test_path) if -e $test_path;
Legend:
Removed from v.1091  
changed lines
  Added in v.1092
  ViewVC Help
Powered by ViewVC 1.1.26