From f8c47d1f3cf5d4e8aa64c39120731ca9054dc786 Mon Sep 17 00:00:00 2001
From: Russ Allbery <rra@stanford.edu>
Date: Wed, 5 Dec 2007 22:55:45 +0000
Subject: Various coding style fixes and cleanup based on a much-appreciated
 code audit by Simon Cozens.  I didn't take all of his advise, and he
 shouldn't be blamed for any remaining issues.

---
 perl/Wallet/ACL/NetDB/Root.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl/Wallet/ACL/NetDB/Root.pm')

diff --git a/perl/Wallet/ACL/NetDB/Root.pm b/perl/Wallet/ACL/NetDB/Root.pm
index 5400d99..6ce7c88 100644
--- a/perl/Wallet/ACL/NetDB/Root.pm
+++ b/perl/Wallet/ACL/NetDB/Root.pm
@@ -37,7 +37,7 @@ sub check {
     my ($self, $principal, $acl) = @_;
     unless ($principal) {
         $self->error ('no principal specified');
-        return undef;
+        return;
     }
     unless ($principal =~ s%^([^/\@]+)/root(\@|\z)%$1$2%) {
         return 0;
-- 
cgit v1.2.3