fix undef warning

diff --git a/IkiWiki/CGI.pm b/IkiWiki/CGI.pm
index 92d042dc92612bc01f4d5d23d1afcd2692d18e6f..74ed2f2178db703d26f4e5b49189414b2760897a 100644 (file)
--- a/IkiWiki/CGI.pm
+++ b/IkiWiki/CGI.pm
@@ -12,7 +12,7 @@ sub page_locked ($$;$) { #{{{
        my $nonfatal=shift;
        
        my $user=$session->param("name");
-       return if length $user && is_admin($user);
+       return if defined $user && is_admin($user);
 
        foreach my $admin (@{$config{adminuser}}) {
                my $locked_pages=userinfo_get($admin, "locked_pages");