ViewVC Help
View File | Revision Log | Show Annotations | Root Listing
root/cvsroot/COMP/SCRAM/src/Interface.pm
(Generate patch)

Comparing COMP/SCRAM/src/Interface.pm (file contents):
Revision 1.1 by williamc, Mon Mar 1 10:37:53 1999 UTC vs.
Revision 1.3 by williamc, Thu Mar 18 10:32:03 1999 UTC

# Line 1 | Line 1
1 #!/usr/local/bin/perl5
2 #
3 #
4
1   package Interface;
2 + require 5.001;
3   require Exporter;
4   require BuildFile;
5   @ISA    = qw(Exporter);
6   @EXPORT = qw( GetClass $ClassDir $Class);
7  
8 < sub GetClass($dirname) {
8 > sub GetClass {
9      my $dirname = shift;
10      $Class="DEFAULT";
11      $ClassDir="";

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines