From f583c57eb08132eff72688c4615811647e8f82cb Mon Sep 17 00:00:00 2001 From: Dirk Koopman Date: Thu, 18 Mar 2010 20:22:19 +0000 Subject: [PATCH] make priv 0 stick on nodes if set --- Changes | 2 ++ perl/DXProt.pm | 2 +- perl/Version.pm | 2 +- 3 files changed, 4 insertions(+), 2 deletions(-) diff --git a/Changes b/Changes index e1a02d80..9e75c1dc 100644 --- a/Changes +++ b/Changes @@ -1,3 +1,5 @@ +18Mar10======================================================================= +1. Make privilege 0 "stick" if set on nodes 13Mar10======================================================================= 1. try to fix AGW crashes caused by peerhost looking at the wrong thing. 2. Add more ax25 fixes for peerhost diff --git a/perl/DXProt.pm b/perl/DXProt.pm index dae0b3c7..289498ce 100644 --- a/perl/DXProt.pm +++ b/perl/DXProt.pm @@ -294,7 +294,7 @@ sub start $self->{consort} = $line; $self->{outbound} = $sort eq 'O'; my $priv = $user->priv; - $priv = $user->priv(1) unless $priv; + $priv = $user->priv(1) unless defined $priv; $self->{priv} = $priv; # other clusters can always be 'normal' users $self->{lang} = $user->lang || 'en'; $self->{isolate} = $user->{isolate}; diff --git a/perl/Version.pm b/perl/Version.pm index f2a84ecb..23e1786e 100644 --- a/perl/Version.pm +++ b/perl/Version.pm @@ -11,6 +11,6 @@ use vars qw($version $subversion $build); $version = '1.55'; $subversion = '0'; -$build = '65'; +$build = '66'; 1; -- 2.43.0