From 47d4f39bfd5d0f331c7693c88c1d7842cf9f6548 Mon Sep 17 00:00:00 2001 From: minima Date: Thu, 4 Jul 2002 22:04:20 +0000 Subject: [PATCH] fixed pc90 --- cmd/set/pc90.pl | 2 +- cmd/unset/pc90.pl | 3 ++- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/cmd/set/pc90.pl b/cmd/set/pc90.pl index 0aa8bea7..cf906516 100644 --- a/cmd/set/pc90.pl +++ b/cmd/set/pc90.pl @@ -19,7 +19,7 @@ foreach $call (@args) { if ($user) { $user->wantpc90(1); $user->put; - push @out, $self->msg('pc90s', $call); + push @out, $self->msg('set', 'PC90', $call); } else { push @out, $self->msg('e3', "Set PC90", $call); } diff --git a/cmd/unset/pc90.pl b/cmd/unset/pc90.pl index 466fc4ce..51dd2147 100644 --- a/cmd/unset/pc90.pl +++ b/cmd/unset/pc90.pl @@ -18,7 +18,8 @@ foreach $call (@args) { my $user = DXUser->get_current($call); if ($user) { $user->wantpc90(0); - push @out, $self->msg('pc90u', $call); + $user->put; + push @out, $self->msg('unset', 'PC90', $call); } else { push @out, $self->msg('e3', "Unset PC90", $call); } -- 2.43.0