diff options
| author | Russ Allbery <rra@stanford.edu> | 2010-02-08 15:47:04 -0800 |
|---|---|---|
| committer | Russ Allbery <rra@stanford.edu> | 2010-02-08 15:47:04 -0800 |
| commit | 346660359be7666e8629c14b2d12cebf794f6f26 (patch) | |
| tree | 9d05f0b347d82be4ac42af9a4e8edfe33025ec95 /perl/Wallet/Object | |
| parent | 04b875599b1d4559dbcd356726035416081c6b48 (diff) | |
Coding style and whitespace fixes
Combine a long series of eval blocks into a single block and a single
error check. Remove trailing whitespace, and in some cases remove
trailing () on method calls where the parens aren't useful.
Diffstat (limited to 'perl/Wallet/Object')
| -rw-r--r-- | perl/Wallet/Object/Keytab.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl/Wallet/Object/Keytab.pm b/perl/Wallet/Object/Keytab.pm index 22598f1..9fece80 100644 --- a/perl/Wallet/Object/Keytab.pm +++ b/perl/Wallet/Object/Keytab.pm @@ -497,7 +497,7 @@ sub create { if (not $kadmin->addprinc ($name)) { die $kadmin->error, "\n"; - } + } $self = $class->SUPER::create ($type, $name, $dbh, $creator, $host, $time); $self->{kadmin} = $kadmin; return $self; |