From 383a0ea632213bc817c8246ccffd9b2cab6a0c19 Mon Sep 17 00:00:00 2001 From: Colin Kuskie Date: Wed, 24 Oct 2007 22:15:51 +0000 Subject: [PATCH] remove extra whitespace that was interfering with POD parsing. --- lib/WebGUI/User.pm | 24 ++++++++++++------------ 1 file changed, 12 insertions(+), 12 deletions(-) diff --git a/lib/WebGUI/User.pm b/lib/WebGUI/User.pm index a9accaac6..006224e42 100644 --- a/lib/WebGUI/User.pm +++ b/lib/WebGUI/User.pm @@ -98,7 +98,7 @@ sub addToGroups { } #------------------------------------------------------------------- - + =head2 acceptsPrivateMessages ( userId ) Returns a boolean of whether or not the user can receive private messages from the user passed in @@ -106,25 +106,25 @@ Returns a boolean of whether or not the user can receive private messages from t =head3 userId userId to determine if the user accepts private messages from - + =cut sub acceptsPrivateMessages { my $self = shift; my $userId = shift; - + my $pmSetting = $self->profileField('allowPrivateMessages'); - + return 0 if ($pmSetting eq "none"); return 1 if ($pmSetting eq "all"); - + if($pmSetting eq "friends") { my $friendsGroup = $self->friends; my $sentBy = WebGUI::User->new($self->session,$userId); #$self->session->errorHandler->warn($self->isInGroup($friendsGroup->getId)); return $sentBy->isInGroup($friendsGroup->getId); } - + return 1; } @@ -285,18 +285,18 @@ sub friends { } #------------------------------------------------------------------- - + =head2 getFirstName ( ) Returns first name, or alias, or username depeneding upon what exists. - + =cut - + sub getFirstName { my $self = shift; return $self->profileField('firstName') || $self->profileField('alias') || $self->username; } - + #------------------------------------------------------------------- =head2 getGroups ( [ withoutExpired ] ) @@ -333,12 +333,12 @@ sub getGroups { } #------------------------------------------------------------------- - + =head2 getWholeName ( ) Attempts to build the user's whole name from profile fields, and ultimately their alias and username if all else fails. - + =cut sub getWholeName {