X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Felements%2Frandom_pass.html;h=778aa20e64e00eb54418a6c15a35e22c3eaccbbd;hp=b215b77d998b8fa0022df2caf342d1e72f95ddca;hb=833cfe5c9938d33c3e6b97ed610c25a7afa6eb04;hpb=3d0a1bb06b895c5be6e3f0517d355442a6b1e125
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>