bitlair/revbank
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make balance zero-crossing timestamp accessible

Browse source
This commit is contained in:
Juerd Waalboer 2019-09-21 01:38:07 +02:00
parent 4178009405
commit b6855df288
1 changed files with 5 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lib/RevBank/Users.pm
View file

@ -22,6 +22,11 @@ sub balance {
return _read()->{ lc $name }->[1]; return _read()->{ lc $name }->[1];
} }
sub since {
my ($name) = @_;
return _read()->{ lc $name }->[3];
}
sub create { sub create {
my ($username) = @_; my ($username) = @_;
open my $fh, '>>', $filename or die $!; open my $fh, '>>', $filename or die $!;