X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Felements%2Frandom_pass.html;h=3a632b9af3b326950c6edd2820a623bc1c80fce5;hb=4ef042d6aea8b8922fc5cfb596023d04da4690be;hp=b215b77d998b8fa0022df2caf342d1e72f95ddca;hpb=a5e611f5ffc045a59fee9e1b03f8ac79ef794d00;p=freeside.git
diff --git a/httemplate/elements/random_pass.html b/httemplate/elements/random_pass.html
index b215b77d9..3a632b9af 100644
--- a/httemplate/elements/random_pass.html
+++ b/httemplate/elements/random_pass.html
@@ -1,17 +1,38 @@
-
+
<%init>
my $id = shift;
my $label = shift || 'Generate';
+my $submitid = shift;
+my $pw_set = join('', FS::Password_Mixin->pw_set);
+my $lower = join('', $pw_set =~ /[[:lower:]]/g);
+my $upper = join('', $pw_set =~ /[[:upper:]]/g);
+my $digit = join('', $pw_set =~ /[[:digit:]]/g);
+my $punct = join('', $pw_set =~ /[[:punct:]]/g);
+
%init>