Changeset 20ec886 for perl


Ignore:
Timestamp:
Aug 5, 2017, 6:57:42 PM (7 years ago)
Author:
Jason Gross <jasongross9@gmail.com>
Branches:
master
Children:
a4b854a
Parents:
38db1a1
git-author:
Jason Gross <jgross@mit.edu> (08/05/17 18:29:14)
git-committer:
Jason Gross <jasongross9@gmail.com> (08/05/17 18:57:42)
Message:
Fix variable names, remove dead variables
File:
1 edited

Legend:

Unmodified
Added
Removed

  • perl/modules/Kerberos/lib/BarnOwl/Module/Kerberos.pm

    r38db1a1 r20ec886  
    6565my $hdlin;
    6666my $hdlerr;
    67 my $w;
    68 
    69 my $a_hdlerr;
    70 my $a;
     67my $kinit_watcher;
    7168
    7269sub do_renew {
    … …  
    8885                     });
    8986    close $stdout;
    90     $w = AnyEvent->child (pid => $pid, cb => sub {
     87    $kinit_watcher = AnyEvent->child (pid => $pid, cb => sub {
    9188        my ($pid, $status) = @_;
    9289        if ($status != 0){
Note: See TracChangeset for help on using the changeset viewer.