fixing a problem with hex and JSON
gettign rid of the migration.txt script, because it's now published on the site instead since all changes are complete
This commit is contained in:
parent
988975abea
commit
d24ac0b273
11 changed files with 10 additions and 952 deletions
|
|
@ -70,9 +70,6 @@ sub generate {
|
|||
my $id = Digest::MD5::md5_base64($v);
|
||||
$id =~ s/\+/_/g;
|
||||
$id =~ s/\//-/g;
|
||||
if ($id =~ /^0/) { # Can't start with 0 because that can cause problems with 0x (hex) and 0b (bin) in perl
|
||||
$id = $self->generate();
|
||||
}
|
||||
return $id;
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue