diff options
| author | nobody <nobody@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2003-04-10 19:59:37 +0000 |
|---|---|---|
| committer | nobody <nobody@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2003-04-10 19:59:37 +0000 |
| commit | 3df4acfa816441fc28a95dee6d0191a927145d95 (patch) | |
| tree | b5ae7ca44662cfd8e5c95f1826e4406021a606f5 /samwise/PerlSam/Generator/View.pm | |
| parent | 60a5612b83d856fc0adc52b9f39fac9960ec9818 (diff) | |
| download | ATCD-pre-subset.tar.gz | |
This commit was manufactured by cvs2svn to create tag 'pre-subset'.pre-subset
Diffstat (limited to 'samwise/PerlSam/Generator/View.pm')
| -rw-r--r-- | samwise/PerlSam/Generator/View.pm | 42 |
1 files changed, 0 insertions, 42 deletions
diff --git a/samwise/PerlSam/Generator/View.pm b/samwise/PerlSam/Generator/View.pm deleted file mode 100644 index 8f7361d771c..00000000000 --- a/samwise/PerlSam/Generator/View.pm +++ /dev/null @@ -1,42 +0,0 @@ -# $Id$ - -package PerlSam::Generator::View; - -use Data::Dumper; -use strict; - -############################################################################### -# Constructor - -sub new (@) -{ - my $proto = shift; - my $class = ref ($proto) || $proto; - my $self = {}; - - bless ($self, $class); - return $self; -} - -############################################################################### -# Methods - -sub GenerateWorkspace (\%) -{ - my $self = shift; - my $data = shift; - - print "-----Workspace\n"; - print Dumper ($data->{WORKSPACE}); -} - -sub GenerateProjects (\%) -{ - my $self = shift; - my $data = shift; - - print "-----Projects\n"; - print Dumper ($data->{PROJECTS}); -} - -1;
\ No newline at end of file |