diff -Nur smeserver-userpanels-1.1.old/root/etc/e-smith/web/functions/userpanel-useraccounts smeserver-userpanels-1.1.new/root/etc/e-smith/web/functions/userpanel-useraccounts --- smeserver-userpanels-1.1.old/root/etc/e-smith/web/functions/userpanel-useraccounts 2016-06-22 12:07:11.481618554 +0200 +++ smeserver-userpanels-1.1.new/root/etc/e-smith/web/functions/userpanel-useraccounts 2016-06-22 12:57:44.434503739 +0200 @@ -38,6 +38,11 @@ use esmith::util; use esmith::db; use esmith::event; +use esmith::FormMagick; +use esmith::cgi; + +my $fm = esmith::FormMagick->new(); + # added by lorenzo use Crypt::Cracklib; @@ -386,8 +391,10 @@ }#if accounts >0 print $q->endform; - print $q->p ($q->hr, $q->font ({size => "-1"}, "www.dungog.net/sme", - $q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Useraccounts help'), " ...")); +# print $q->p ($q->hr, $q->font ({size => "-1"}, "www.dungog.net/sme", + esmith::cgi::genFooter($fm); + + print $q->a ({href => $q->url (-absolute => 1) . "?state=help"}, 'Useraccounts help'), " ..."; print ''; print ''; print $q->end_html; @@ -598,7 +605,8 @@ print $q->endform; - print $q->p ($q->hr, $q->font ({size => "-1"}, "www.dungog.net/sme")); +# print $q->p ($q->hr, $q->font ({size => "-1"}, "www.dungog.net/sme")); + esmith::cgi::genFooter($fm); print ''; print ''; @@ -1043,7 +1051,9 @@ print $q->endform; - print $q->p ($q->hr, $q->font ({size => "-1"}, "www.dungog.net/sme")); +# print $q->p ($q->hr, $q->font ({size => "-1"}, "www.dungog.net/sme")); + esmith::cgi::genFooter($fm); + print ''; print ''; @@ -1410,7 +1420,7 @@ } print $q->endform; - esmith::cgi5::genFooter ($q); + esmith::cgi::genFooter($fm); return; } @@ -1594,7 +1604,7 @@ } print $q->endform; - esmith::cgi5::genFooter ($q); + esmith::cgi::genFooter($fm); return; } @@ -1746,7 +1756,7 @@ -default => 'performLock'); print $q->endform; - esmith::cgi5::genFooter ($q); + esmith::cgi::genFooter($fm); return; } @@ -1936,8 +1946,10 @@ '))); print $q->endform; - print $q->p ($q->hr, $q->font ({size => "-1"}, "www.dungog.net/sme ", - $q->a ({href => $q->url (-absolute => 1) . ""}, 'Return to main'), " ...")); +# print $q->p ($q->hr, $q->font ({size => "-1"}, "www.dungog.net/sme ", + esmith::cgi::genFooter($fm); + + $q->a ({href => $q->url (-absolute => 1) . ""}, 'Return to main'), " ..."; return; } diff -Nur smeserver-userpanels-1.1.old/root/etc/e-smith/web/functions/userpanel-userbackup smeserver-userpanels-1.1.new/root/etc/e-smith/web/functions/userpanel-userbackup --- smeserver-userpanels-1.1.old/root/etc/e-smith/web/functions/userpanel-userbackup 2005-09-21 12:24:18.000000000 +0200 +++ smeserver-userpanels-1.1.new/root/etc/e-smith/web/functions/userpanel-userbackup 2016-06-22 12:18:28.273369737 +0200 @@ -34,6 +34,9 @@ use esmith::util; use esmith::db; use esmith::lockfile; +use esmith::FormMagick; + +my $fm = esmith::FormMagick->new(); sub showInitial ($$); sub performAndShowResult ($); @@ -211,7 +214,9 @@ print $q->endform; - print $q->p ($q->hr, $q->font ({size => "-1"}, "www.dungog.net/sme")); + # print $q->p ($q->hr, $q->font ({size => "-1"}, "www.dungog.net/sme")); + esmith::cgi::genFooter($fm); + print ''; print '';