cmd/set/qth

   1 #
   2 # set the qth field
   3 #
   4 # $Id$
   5 #
   6 my ($self, $args)  = @_;
   7 my $user = $self->user;
   8 return (1, "qth is now ", $user->qth($args));