ViewVC Help

View File | Revision Log | Show Annotations | Root Listing

root/cvsroot/COMP/SCRAM/src/ToolBox.pm

Comparing COMP/SCRAM/src/ToolBox.pm (file contents):
Revision 1.1 by williamc, Mon Mar 1 10:37:54 1999 UTC vs.
Revision 1.3 by williamc, Wed Mar 3 17:04:14 1999 UTC

#	Line 1 | Line 1
1	–	#!perl
2	–	#
1		# Toolbox Class to process tool functionality information
2		#
3		#
4
5		package ToolBox;
6	+	require 5.001;
7		require Exporter;
8		@ISA=qw(Exporter);
9		use Carp;
10	<	use SCRAMUtils;
10	>	use Utilities::SCRAMUtils;
11
12		# A new toolbox object
13		sub new {
#	Line 129 | Line 128 | sub maketargets ($output, $input, $targe
128
129		sub addtotoolbox {
130		my $self=shift;
131	<	use SCRAMUtils;
131	>	use Utilities::SCRAMUtils;
132		my $out=shift;
133		my $in=shift;
134		my $toolkey=shift;
#	Line 140 | Line 139 | sub addtotoolbox {
139		my $key="$out:$in";
140		my $fullkey=$key.";$fulltypes:$toolkey:";
141		$fullkey=~s/;;*/;/g;
142	<	updatelookup($self->{toolboxfile}, $fullkey, $commandstring);
142	>	SCRAMUtils::updatelookup($self->{toolboxfile}, $fullkey, $commandstring);
143		}

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines