cvs commit: p5ee/App-Context/lib App.pm

[Stephen Adkins]

cvsuser     04/02/09 14:04:43

  Modified:    App-Context/lib App.pm
  Log:
  changed reset() to shutdown()
  
  Revision  Changes    Path
  1.10      +3 -2      p5ee/App-Context/lib/App.pm
  
  Index: App.pm
  ===================================================================
  RCS file: /cvs/public/p5ee/App-Context/lib/App.pm,v
  retrieving revision 1.9
  retrieving revision 1.10
  diff -u -w -r1.9 -r1.10
  --- App.pm    2 Feb 2004 22:17:18 -0000       1.9
  +++ App.pm    9 Feb 2004 22:04:37 -0000       1.10
  @@ -1,6 +1,6 @@
   
   #############################################################################
  -## $Id: App.pm,v 1.9 2004/02/02 22:17:18 spadkins Exp $
  +## $Id: App.pm,v 1.10 2004/02/09 22:04:37 spadkins Exp $
   #############################################################################
   
   package App;
  @@ -604,10 +604,11 @@
       return($context{$name});
   }
   
  -sub reset {
  +sub shutdown {
       &App::sub_entry if ($App::trace_subs);
       my ($self, $name) = @_;
       $name = "default" if (!defined $name);
  +    $context{$name}->shutdown() if (defined $context{$name});
       delete $context{$name};
       &App::sub_exit() if ($App::trace_subs);
   }