1 |
wellsi |
1.1 |
diff -ruN e-smith-lib-2.4.0.old/root/usr/share/perl5/vendor_perl/esmith/cgi.pm e-smith-lib-2.4.0/root/usr/share/perl5/vendor_perl/esmith/cgi.pm |
2 |
|
|
--- e-smith-lib-2.4.0.old/root/usr/share/perl5/vendor_perl/esmith/cgi.pm 2008-08-20 14:23:20.000000000 -0700 |
3 |
|
|
+++ e-smith-lib-2.4.0/root/usr/share/perl5/vendor_perl/esmith/cgi.pm 2014-02-02 21:17:47.000000000 -0800 |
4 |
|
|
@@ -147,9 +147,8 @@ |
5 |
|
|
$bodyStyle = "main" |
6 |
|
|
} |
7 |
|
|
# the -CLASS thing gets sent as a body class, not in the header |
8 |
|
|
- print $q->start_html (-TITLE => 'Mitel Networks server manager', |
9 |
|
|
- -AUTHOR => 'bugs@e-smith.com', |
10 |
|
|
- -META => {'copyright' => 'Copyright 1999-2005 Mitel Networks Corporation'}, |
11 |
|
|
+ print $q->start_html (-TITLE => 'SME Server server manager', |
12 |
|
|
+ -META => {'copyright' => 'Copyright 1999-2006 Mitel Networks Corporation, Copyright (C) 2014 Koozali Foundation, Inc.'}, |
13 |
|
|
-SCRIPT => "$script", |
14 |
|
|
-CLASS => "$bodyStyle", |
15 |
|
|
-STYLE => { |
16 |
|
|
@@ -181,8 +180,8 @@ |
17 |
|
|
print $q->p |
18 |
|
|
($q->hr ({-CLASS => "sme-copyrightbar"}), |
19 |
|
|
$q->div ({-CLASS => "sme-copyright"}, |
20 |
|
|
- "Mitel Networks server ${release}<BR>" . |
21 |
|
|
- "Copyright 1999-2003 Mitel Networks Corporation.<BR>" . |
22 |
|
|
+ "SME Server server ${release}<BR>" . |
23 |
|
|
+ "Copyright 1999-2006 Mitel Networks Corporation, Copyright (C) 2014 Koozali Foundation, Inc..<BR>" . |
24 |
|
|
"All rights reserved.") |
25 |
|
|
); |
26 |
|
|
|