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

Comparing COMP/SCRAM/src/Scram/ScramFunctions.pm (file contents):
Revision 1.12 by sashby, Tue Jun 12 16:02:56 2001 UTC vs.
Revision 1.14 by sashby, Wed Jul 11 15:48:17 2001 UTC

# Line 86 | Line 86 | sub setuptoolsinarea {
86          my $self=shift;
87          my $area=shift;
88  
89 <        # -- initialise
89 >        # -- initialise
90 >        print "Initialising setup procedure......","\n";
91          $self->_allprojectinitsearcher();
92  
93          # -- create a new toolbox object
# Line 241 | Line 242 | sub addareatoDB {
242          $self->scramprojectdb()->addarea($tagname,$version,$area);
243   }
244  
245 +
246 + sub removeareafromDB
247 +   {
248 +   ###############################################################
249 +   # removearefromDB()                                           #
250 +   ###############################################################
251 +   # modified : Thu Jun 14 10:46:22 2001 / SFA                   #
252 +   # params   : projectname, projectversion                      #
253 +   #          :                                                  #
254 +   #          :                                                  #
255 +   #          :                                                  #
256 +   # function : Remove project <projectname> from DB file.       #
257 +   #          :                                                  #
258 +   #          :                                                  #
259 +   ###############################################################
260 +   my $self=shift;
261 +   my $projname=shift;
262 +   my $version=shift;
263 +  
264 +   # -- Remove from the DB:
265 +   $self->scramprojectdb()->removearea($projname,$version);
266 +   }
267 +
268 +
269   sub spawnversion
270     {
271     my $self=shift;

Diff Legend

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