fixed import export
[spider.git] / cmd / set / password.pl
index 1aa425f610686a229cce343e06e01af1fd6d4e8b..1c248d023576fc8bac0cc9cee1fb288b3bc361b2 100644 (file)
@@ -19,6 +19,7 @@ return (1, $self->msg('e5')) if $self->priv < 9;
 if ($ref = DXUser->get_current($call)) {
        $line =~ s/^\s*$call\s+//;
        $line =~ s/\s+//og;                    # remove any blanks
+       $line =~ s/[{}]//g;   # no braces allowed
        $ref->passwd($line);
        $ref->put();
        push @out, $self->msg("password", $call);