X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Felements%2Frandom_pass.html;h=778aa20e64e00eb54418a6c15a35e22c3eaccbbd;hb=9270a9fe7ea00f5a24a9ce3b927f932db6650b23;hp=b215b77d998b8fa0022df2caf342d1e72f95ddca;hpb=54a357b171aa44f9399b4c146acd2afd3b686075;p=freeside.git
diff --git a/httemplate/elements/random_pass.html b/httemplate/elements/random_pass.html
index b215b77d9..778aa20e6 100644
--- a/httemplate/elements/random_pass.html
+++ b/httemplate/elements/random_pass.html
@@ -1,17 +1,37 @@
-
+
<%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>