oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

migrate User deprecation messages to derp

Browse source
This commit is contained in:
Doug Bell 2010-12-09 18:57:58 -06:00
parent 50c4910083
commit 1c24c8189a
1 changed files with 2 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/WebGUI/User.pm
View file

@ -27,8 +27,6 @@ use WebGUI::Friends;
use WebGUI::Deprecate;
use Carp qw( carp );
my %deprecateMessage = ();
=head1 NAME
Package WebGUI::User
@ -211,8 +209,7 @@ Returns an instance of the authentication object for this user.
# DEPRECATED. Remove in 9.0
sub authInstance {
my $message = "WebGUI::User::authInstance is deprecated. Instantiate the auth method directly instead.";
carp $message unless $deprecateMessage{$message}++;
derp "WebGUI::User::authInstance is deprecated. Instantiate the auth method directly instead.";
my $self = shift;
my $session = $self->session;
@ -1204,8 +1201,7 @@ The value to set the profile field name to.
# DEPRECATED! Remove in 9.0
sub profileField {
my $message = "WebGUI::User::profileField is deprecated. Use get() and update() instead\n";
carp $message unless $deprecateMessage{$message}++;
derp "WebGUI::User::profileField is deprecated. Use get() and update() instead";
my $self = shift;
my $fieldName = shift;
my $value = shift;