39 |
diff -Nur -x '*.orig' -x '*.rej' e-smith-base-4.18.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/useraccounts.pm mezzanine_patched_e-smith-base-4.18.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/useraccounts.pm |
diff -Nur -x '*.orig' -x '*.rej' e-smith-base-4.18.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/useraccounts.pm mezzanine_patched_e-smith-base-4.18.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/useraccounts.pm |
40 |
--- e-smith-base-4.18.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/useraccounts.pm 2008-03-26 10:49:00.000000000 -0600 |
--- e-smith-base-4.18.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/useraccounts.pm 2008-03-26 10:49:00.000000000 -0600 |
41 |
+++ mezzanine_patched_e-smith-base-4.18.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/useraccounts.pm 2008-04-01 09:24:23.000000000 -0600 |
+++ mezzanine_patched_e-smith-base-4.18.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/useraccounts.pm 2008-04-01 09:24:23.000000000 -0600 |
42 |
|
@@ -54,6 +54,7 @@ |
43 |
|
print_save_or_add_button |
44 |
|
get_pptp_value |
45 |
|
print_ipsec_client_section |
46 |
|
+ get_prop |
47 |
|
|
48 |
|
system_password_compare |
49 |
|
system_valid_password |
50 |
@@ -283,6 +283,9 @@ |
@@ -283,6 +283,9 @@ |
51 |
my $fwd = $cgi->param('ForwardAddress') ? |
my $fwd = $cgi->param('ForwardAddress') ? |
52 |
$cgi->param('ForwardAddress') : |
$cgi->param('ForwardAddress') : |
82 |
{ |
{ |
83 |
$userprops{$field} = $q->param($field); |
$userprops{$field} = $q->param($field); |
84 |
} |
} |
85 |
|
@@ -1108,6 +1109,20 @@ |
86 |
|
} |
87 |
|
|
88 |
|
|
89 |
|
+=head2 get_prop ITEM PROP |
90 |
|
+ |
91 |
|
+A simple accessor for esmith::ConfigDB::Record::prop |
92 |
|
+ |
93 |
|
+=cut |
94 |
|
+ |
95 |
|
+sub get_prop |
96 |
|
+{ |
97 |
|
+ my ($fm, $item, $prop, $default) = @_; |
98 |
|
+ |
99 |
|
+ return $configdb->get_prop($item, $prop) || $default; |
100 |
|
+} |
101 |
|
+ |
102 |
|
+ |
103 |
|
=head1 System Password manipulation routines |
104 |
|
|
105 |
|
XXX FIXME - These should be merged with the useraccouts versions |